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

_______________________________________________
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.