<html><body><div style="color:#000; background-color:#fff; font-family:Courier New, courier, monaco, monospace, sans-serif;font-size:10pt"><div>Pessoal, gostaria de adicionar bandas de confiança na CMR que segue. Agradeço qualquer dica.</div><div><br></div><div><div class="MsoNormal" align="left" style="text-align: left; text-indent: 0cm; "><span lang="EN-US" style="font-size:8.0pt;font-family:"Times New Roman","serif";
mso-ansi-language:EN-US;mso-fareast-language:PT-BR;mso-bidi-font-style:italic">x<-structure(list(week
= c(9L, 10L, 11L, 12L, 9L, 10L, 11L, 12L, <o:p></o:p></span></div>
<div class="MsoNormal" align="left" style="text-align: left; text-indent: 0cm; "><span lang="EN-US" style="font-size:8.0pt;font-family:"Times New Roman","serif";
mso-ansi-language:EN-US;mso-fareast-language:PT-BR;mso-bidi-font-style:italic">9L,
10L, 11L, 12L, 9L, 10L, 11L, 12L, 9L, 10L, 11L, 12L, 9L, <o:p></o:p></span></div>
<div class="MsoNormal" align="left" style="text-align: left; text-indent: 0cm; "><span lang="EN-US" style="font-size:8.0pt;font-family:"Times New Roman","serif";
mso-ansi-language:EN-US;mso-fareast-language:PT-BR;mso-bidi-font-style:italic">10L,
11L, 12L, 9L, 10L, 11L, 12L, 9L, 10L, 11L, 12L, 9L, 10L, <o:p></o:p></span></div>
<div class="MsoNormal" align="left" style="text-align: left; text-indent: 0cm; "><span lang="EN-US" style="font-size:8.0pt;font-family:"Times New Roman","serif";
mso-ansi-language:EN-US;mso-fareast-language:PT-BR;mso-bidi-font-style:italic">11L,
12L, 9L, 10L, 11L, 12L, 9L, 10L, 11L, 12L, 9L, 10L, 11L, <o:p></o:p></span></div>
<div class="MsoNormal" align="left" style="text-align: left; text-indent: 0cm; "><span lang="EN-US" style="font-size:8.0pt;font-family:"Times New Roman","serif";
mso-ansi-language:EN-US;mso-fareast-language:PT-BR;mso-bidi-font-style:italic">12L,
9L, 10L, 11L, 12L, 9L, 10L, 11L, 12L, 9L, 10L, 11L, 12L, <o:p></o:p></span></div>
<div class="MsoNormal" align="left" style="text-align: left; text-indent: 0cm; "><span lang="EN-US" style="font-size:8.0pt;font-family:"Times New Roman","serif";
mso-ansi-language:EN-US;mso-fareast-language:PT-BR;mso-bidi-font-style:italic">9L,
10L, 11L, 12L, 9L, 10L, 11L, 12L), kid = c(1L, 1L, 1L, 1L, <o:p></o:p></span></div>
<div class="MsoNormal" align="left" style="text-align: left; text-indent: 0cm; "><span lang="EN-US" style="font-size:8.0pt;font-family:"Times New Roman","serif";
mso-ansi-language:EN-US;mso-fareast-language:PT-BR;mso-bidi-font-style:italic">2L,
2L, 2L, 2L, 3L, 3L, 3L, 3L, 4L, 4L, 4L, 4L, 5L, 5L, 5L, 5L, <o:p></o:p></span></div>
<div class="MsoNormal" align="left" style="text-align: left; text-indent: 0cm; "><span lang="EN-US" style="font-size:8.0pt;font-family:"Times New Roman","serif";
mso-ansi-language:EN-US;mso-fareast-language:PT-BR;mso-bidi-font-style:italic">6L,
6L, 6L, 6L, 7L, 7L, 7L, 7L, 8L, 8L, 8L, 8L, 9L, 9L, 9L, 9L, <o:p></o:p></span></div>
<div class="MsoNormal" align="left" style="text-align: left; text-indent: 0cm; "><span lang="EN-US" style="font-size:8.0pt;font-family:"Times New Roman","serif";
mso-ansi-language:EN-US;mso-fareast-language:PT-BR;mso-bidi-font-style:italic">10L,
10L, 10L, 10L, 11L, 11L, 11L, 11L, 12L, 12L, 12L, 12L, 13L, <o:p></o:p></span></div>
<div class="MsoNormal" align="left" style="text-align: left; text-indent: 0cm; "><span lang="EN-US" style="font-size:8.0pt;font-family:"Times New Roman","serif";
mso-ansi-language:EN-US;mso-fareast-language:PT-BR;mso-bidi-font-style:italic">13L,
13L, 13L, 14L, 14L, 14L, 14L, 15L, 15L, 15L, 15L, 16L, 16L, <o:p></o:p></span></div>
<div class="MsoNormal" align="left" style="text-align: left; text-indent: 0cm; "><span lang="EN-US" style="font-size:8.0pt;font-family:"Times New Roman","serif";
mso-ansi-language:EN-US;mso-fareast-language:PT-BR;mso-bidi-font-style:italic">16L,
16L, 17L, 17L, 17L, 17L), treatment = c(1L, 1L, 1L, 1L, <o:p></o:p></span></div>
<div class="MsoNormal" align="left" style="text-align: left; text-indent: 0cm; "><span lang="EN-US" style="font-size:8.0pt;font-family:"Times New Roman","serif";
mso-ansi-language:EN-US;mso-fareast-language:PT-BR;mso-bidi-font-style:italic">1L,
1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, <o:p></o:p></span></div>
<div class="MsoNormal" align="left" style="text-align: left; text-indent: 0cm; "><span lang="EN-US" style="font-size:8.0pt;font-family:"Times New Roman","serif";
mso-ansi-language:EN-US;mso-fareast-language:PT-BR;mso-bidi-font-style:italic">1L,
1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 2L, 2L, 2L, 2L, <o:p></o:p></span></div>
<div class="MsoNormal" align="left" style="text-align: left; text-indent: 0cm; "><span lang="EN-US" style="font-size:8.0pt;font-family:"Times New Roman","serif";
mso-ansi-language:EN-US;mso-fareast-language:PT-BR;mso-bidi-font-style:italic">2L,
2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, <o:p></o:p></span></div>
<div class="MsoNormal" align="left" style="text-align: left; text-indent: 0cm; "><span lang="EN-US" style="font-size:8.0pt;font-family:"Times New Roman","serif";
mso-ansi-language:EN-US;mso-fareast-language:PT-BR;mso-bidi-font-style:italic">2L,
2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L<o:p></o:p></span></div>
<div class="MsoNormal" align="left" style="text-align: left; text-indent: 0cm; "><span lang="EN-US" style="font-size:8.0pt;font-family:"Times New Roman","serif";
mso-ansi-language:EN-US;mso-fareast-language:PT-BR;mso-bidi-font-style:italic">),
gain = c(1.2, 1, 1.1, 1.3, 1.2, 1.1, 1.4, 1.5, 1.3, 1.4, 1.4, <o:p></o:p></span></div>
<div class="MsoNormal" align="left" style="text-align: left; text-indent: 0cm; "><span lang="EN-US" style="font-size:8.0pt;font-family:"Times New Roman","serif";
mso-ansi-language:EN-US;mso-fareast-language:PT-BR;mso-bidi-font-style:italic">1.6,
1.1, 1.1, 1.2, 1.3, 1.2, 1.3, 1.2, 1.3, 1.1, 1.1, 1.1, 1.2, <o:p></o:p></span></div>
<div class="MsoNormal" align="left" style="text-align: left; text-indent: 0cm; "><span lang="EN-US" style="font-size:8.0pt;font-family:"Times New Roman","serif";
mso-ansi-language:EN-US;mso-fareast-language:PT-BR;mso-bidi-font-style:italic">1.1,
1.2, 1.3, 1.5, 1.3, 1.3, 1.3, 1.4, 1.2, 1.5, 1.9, 2.1, 1.3, <o:p></o:p></span></div>
<div class="MsoNormal" align="left" style="text-align: left; text-indent: 0cm; "><span lang="EN-US" style="font-size:8.0pt;font-family:"Times New Roman","serif";
mso-ansi-language:EN-US;mso-fareast-language:PT-BR;mso-bidi-font-style:italic">1.2,
1.4, 1.7, 1.5, 1.7, 1.6, 1.7, 1.4, 1.5, 1.7, 1.8, 1.2, 1.2, <o:p></o:p></span></div>
<div class="MsoNormal" align="left" style="text-align: left; text-indent: 0cm; "><span lang="EN-US" style="font-size:8.0pt;font-family:"Times New Roman","serif";
mso-ansi-language:EN-US;mso-fareast-language:PT-BR;mso-bidi-font-style:italic">1.4,
1.6, 1, 1.1, 1.4, 1.5, 1.4, 1.8, 2.1, 2.1, 1.1, 1.3, 1.4, <o:p></o:p></span></div>
<div class="MsoNormal" align="left" style="text-align: left; text-indent: 0cm; "><span lang="EN-US" style="font-size:8.0pt;font-family:"Times New Roman","serif";
mso-ansi-language:EN-US;mso-fareast-language:PT-BR;mso-bidi-font-style:italic">1.8,
1.2, 1.5, 1.7, 1.9)), .Names = c("week", "kid",
"treatment", <o:p></o:p></span></div>
<div class="MsoNormal" align="left" style="text-align: left; text-indent: 0cm; "><span lang="EN-US" style="font-size:8.0pt;font-family:"Times New Roman","serif";
mso-ansi-language:EN-US;mso-fareast-language:PT-BR;mso-bidi-font-style:italic">"gain"),
class = "data.frame", row.names = c(NA, -68L)) <o:p></o:p></span></div>
<div class="MsoNormal" align="left" style="text-align: left; text-indent: 0cm; "><span lang="EN-US" style="font-size:12.0pt;font-family:"Times New Roman","serif";mso-ansi-language:
EN-US;mso-fareast-language:PT-BR;mso-bidi-font-style:italic">y<-aggregate(.~week+treatment,
x, FUN=mean)<o:p></o:p></span></div>
<div class="MsoNormal" align="left" style="text-align: left; text-indent: 0cm; "><span lang="EN-US" style="font-size:12.0pt;font-family:"Times New Roman","serif";mso-ansi-language:
EN-US;mso-fareast-language:PT-BR;mso-bidi-font-style:italic">s1<-subset(y,
treatment==1)<o:p></o:p></span></div>
<div class="MsoNormal" align="left" style="text-align: left; text-indent: 0cm; "><span lang="EN-US" style="font-size:12.0pt;font-family:"Times New Roman","serif";mso-ansi-language:
EN-US;mso-fareast-language:PT-BR;mso-bidi-font-style:italic">s2<-subset(y,
treatment==2)<o:p></o:p></span></div>
<div class="MsoNormal" align="left" style="text-align: left; text-indent: 0cm; "><span lang="EN-US" style="font-size:12.0pt;font-family:"Times New Roman","serif";mso-ansi-language:
EN-US;mso-fareast-language:PT-BR;mso-bidi-font-style:italic"><o:p> </o:p></span></div>
<div class="MsoNormal" align="left" style="text-align: left; text-indent: 0cm; "><span lang="EN-US" style="font-size:12.0pt;font-family:"Times New Roman","serif";mso-ansi-language:
EN-US;mso-fareast-language:PT-BR;mso-bidi-font-style:italic">plot(gain~week,
data=s1, col=1, type="o", ylim=c(1,2), lty=1)<o:p></o:p></span></div>
<div class="MsoNormal" align="left" style="text-align: left; text-indent: 0cm; "><span lang="EN-US" style="font-size:12.0pt;font-family:"Times New Roman","serif";mso-ansi-language:
EN-US;mso-fareast-language:PT-BR;mso-bidi-font-style:italic">points(gain~week,
data=s2, col=2, type="o", lty=2)<o:p></o:p></span></div>
<div class="MsoNormal" align="left" style="text-align: left; text-indent: 0cm; "><span lang="EN-US" style="font-size:12.0pt;font-family:"Times New Roman","serif";mso-ansi-language:
EN-US;mso-fareast-language:PT-BR;mso-bidi-font-style:italic">legend(9.5,1.7, c("t1","t2"),
col=c(1,2), lty=c(1,2))<o:p></o:p></span></div></div></div></body></html>