<html><body><div style="color:#000; background-color:#fff; font-family:arial, helvetica, sans-serif;font-size:12pt"><div><span>Bom dia senhores!</span></div><div><br><span></span></div><div><span>Suponhamos que tem-se dois níveis de um fator "p" e dois níveis de um fator "n", no qual os níveis do fator "p" irei representar pela letra "a" e os níveis do fator "n" pela letra "b". Então tem-se a seguinte configuração:</span></div><div><br><span></span></div><div><span>k1 <- c(1.8850,2.1575,2.4775,2.7975)<br>k2 <- c(2.9375,2.2475,2.7300,2.9950)<br>tab <- matrix(c(k1,k2),ncol=2)<br>rownames(tab) <- c('p<span style="font-weight: bold;">a</span>n<span style="font-weight: bold;">b</span>','p<span style="font-weight: bold;">a</span>n<span style="font-weight: bold;">b</span>,'p<span style="font-weight: bold;">a</span>n<span style="font-weight: bold;">b</span>','p<span style="font-weight: bold;">a</span>n<span style="font-weight:
bold;">b</span>')<br>colnames(tab) <- c('k1','k2')<br>tab<br> k1 k2<br>panb 1,8850 2,9375<br>panb 2,1575 2,2475<br>panb 2,4775 2,7300<br>panb 2,7975 2,9950<br></span></div><div><br><span></span></div><div><span>Vamos supor que eu queira os valores do nível 1 do fator "p" e nível 1 do fator "n". Então, a=1 e b=1;</span></div><div><span><br></span></div><div><span>p1n1 1,8850 2,9375</span></div><div><br></div><div>Agora nível 1 do fator "p" e nível 2 do fator "n". Então, a=1, b=2;</div><div><br></div><div>p1n2 <span>2,1575 2,2475</span></div><div><br><span></span></div><div><span>Tem como automatizar isto em função destes dois parâmetros?</span></div><div><br><span></span></div><div><span>algo como:</span></div><div><br><span></span></div><div><span>medias = as.vector(tab[ab, ])</span>????</div><div><br></div><div>A coluna não
interessa, podem ficar tranquilo! Apenas as linhas interessam de acordo com os parâmetros.</div><div><br></div><div>Se alguém puder me dar uma ajuda ficarei grato!</div><div><br></div><div>Abraços!</div><div><br></div><div>S,f.P</div><div>(Allaman)<br></div><div><br></div><div><br><span></span></div><div><span></span></div><div> </div><div style="background-color:transparent;" align="center"><font style="background-color:transparent;" face="comic sans ms" size="2"><font size="1"><b><br></b></font></font></div><div style="text-align:left;background-color:transparent;" align="center"><font style="background-color:transparent;"><font face="courier, monaco, monospace, sans-serif" size="2">\begin{signature}</font></font></div><div style="text-align:left;background-color:transparent;" align="center"><font style="background-color:transparent;"><font face="courier, monaco, monospace, sans-serif" size="2"><<>>=</font></font></div><div
style="text-align:left;background-color:transparent;" align="center"><font class="Apple-style-span" face="courier, monaco, monospace, sans-serif" size="2">Prof. Dr. Ivan Bezerra Allaman</font></div><div style="text-align:left;background-color:transparent;" align="center"><font class="Apple-style-span" face="courier, monaco, monospace, sans-serif" size="2">Universidade Estadual de Santa Cruz</font></div><div style="text-align:left;background-color:transparent;" align="center"><font class="Apple-style-span" face="courier, monaco, monospace, sans-serif" size="2">Departamento de Ciências Exatas e Tecnológicas</font></div><div style="text-align:left;background-color:transparent;" align="center"><font class="Apple-style-span" face="courier, monaco, monospace, sans-serif" size="2">Ilhéus/BA - Brasil</font></div><div style="text-align:left;background-color:transparent;" align="center"><font class="Apple-style-span" face="courier, monaco, monospace,
sans-serif" size="2">Fone: +55 73 3680-5596</font></div><div style="text-align:left;background-color:transparent;" align="center"><font class="Apple-style-span" face="courier, monaco, monospace, sans-serif" size="2">E-mail: ivanalaman@yahoo.com.br/ivanalaman@gmail.com</font></div><div style="text-align:left;background-color:transparent;" align="center"><font style="background-color:transparent;"><font face="courier, monaco, monospace, sans-serif" size="2">@</font></font></div><div style="text-align:left;background-color:transparent;" align="center"><font style="background-color:transparent;"><font face="courier, monaco, monospace, sans-serif" size="2">\end{signature}</font></font></div></div></body></html>