Vê aí se é isso mesmo o que vc quer:
expand.grid(1:2, 1:2) Var1 Var2 1 1 1 2 2 1 3 1 2 4 2 2 apply(expand.grid(1:2, 1:2), 1, function(x){paste('p', x[1], 'n', x[2], sep='')} ) [1] "p1n1" "p2n1" "p1n2" "p2n2"
Em 15 de julho de 2012 13:07, Ivan Bezerra Allaman <ivanalaman@yahoo.com.br> escreveu:
Bom dia senhores!
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:
k1 <- c(1.8850,2.1575,2.4775,2.7975) k2 <- c(2.9375,2.2475,2.7300,2.9950) tab <- matrix(c(k1,k2),ncol=2) rownames(tab) <- c('panb','panb,'panb','panb') colnames(tab) <- c('k1','k2') tab k1 k2 panb 1,8850 2,9375 panb 2,1575 2,2475 panb 2,4775 2,7300 panb 2,7975 2,9950
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;
p1n1 1,8850 2,9375
Agora nível 1 do fator "p" e nível 2 do fator "n". Então, a=1, b=2;
p1n2 2,1575 2,2475
Tem como automatizar isto em função destes dois parâmetros?
algo como:
medias = as.vector(tab[ab, ])????
A coluna não interessa, podem ficar tranquilo! Apenas as linhas interessam de acordo com os parâmetros.
Se alguém puder me dar uma ajuda ficarei grato!
Abraços!
S,f.P (Allaman)
\begin{signature} <<>>= Prof. Dr. Ivan Bezerra Allaman Universidade Estadual de Santa Cruz Departamento de Ciências Exatas e Tecnológicas Ilhéus/BA - Brasil Fone: +55 73 3680-5596 E-mail: ivanalaman@yahoo.com.br/ivanalaman@gmail.com @ \end{signature}
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.