Boa noite Pessoal, No meu CRM abaixo eu usei a função melt para empilhar, tem alguma outra função se eu desejo agora desempilhar o objeto criado e voltar o objeto a forma original, a função acast e dcast não funcionaram, Obrigado, #Dados artificiais ----------------------------------- da <- expand.grid(trat=gl(4,1), tempo=1:10) X <- model.matrix(~trat+tempo, da); ncol(X) da$Esp1<-rpois(da[,1],5) da$Esp2<-rpois(da[,1],10) da$Esp3<-rpois(da[,1],15) head(da) #Empilhar da.melt = melt(da, id = c("trat", "tempo"), variable.name="Esp",value.name="N") head(da.melt) #Mas e agora para à partir do objeto da.melt como eu volto para o objeto da? -- ====================================================================== Alexandre dos Santos Proteção Florestal IFMT - Instituto Federal de Educação, Ciência e Tecnologia de Mato Grosso Campus Cáceres Caixa Postal 244 Avenida dos Ramires, s/n Bairro: Distrito Industrial Cáceres - MT CEP: 78.200-000 Fone: (+55) 65 8132-8112 (TIM) (+55) 65 9686-6970 (VIVO) e-mails:alexandresantosbr@yahoo.com.br alexandre.santos@cas.ifmt.edu.br Lattes: http://lattes.cnpq.br/1360403201088680 ====================================================================== On 25/02/2015 06:53, ASANTOS wrote:
Obrigado Salah
Era exatamente isto que eu queria!!
On 24/02/2015 21:50, izi wrote:
Olá Alexandre
Basta usar a função melt do pacote reshape2
library(reshape2)
da.melt = melt(da, id = c("trat", "tempo"), variable.name="Esp", value.name="N") da.melt
--- Este email foi escaneado pelo Avast antivírus. http://www.avast.com