[R-br] reshape
Antonio Moita
awmoita em yahoo.com.br
Quarta Agosto 16 14:11:53 -03 2017
# Suponha o sequinte experimento em blocos ao acaso
# com tamanho da parcela experimental de 4 plantas
# no qual se conta o número pulpas ninfas e ovos.
# GOSTARIA DE OBTER O CONJUNTO DE DADOS QUE FOSSE A SOMA DE PLANTAS POR CULTIVAR BLOCOS,
# QUANDO USO TODO CONJUNTO DE DADOS FUNCIONA BEM
require(reshape)
x<-factor(LETTERS[1:3])
cultivar<-rep(x, each=6)
bloco<-rep(1:2,each=3)
planta<-rep(1:3)
ninfa<-c(0,0,0,1,1,1,0,0,0,1,2,3,0,1,2,0,0,1)
pulpa<-c(1,0,1,1,0,1,0,0,0,0,0,0,0,2,1,0,0,4)
ovos<-c(2,2,0,3,0,0,0,0,4,0,0,0,0,2,0,0,0,0)
df<-data.frame(cultivar, bloco, planta, ninfa, pulpa, ovos)
df.m<-melt(df, id=c("cultivar","bloco","planta"))
df.m
df.c<-cast(df.m, cultivar + bloco ~ variable, sum, na.rm=TRUE )
df.c
# MAS QUANDO SELECIONO SÓ UMA PARTE
# OS VALORES NÃO BATEM COM O QUADRO ANTERIOR, ALGUEM SABERIA EXPLICAR ????
df.c1<-cast(df.m, cultivar + bloco ~ variable, subset=variable==c("ninfa","pulpa"), sum)
df.c1
# a SOMA DE ninfa e pulpa tambem esta errada
df.c0<-cast(df.m, cultivar + bloco ~ ., subset=variable==c("ninfa","pulpa"), sum)
df.c0
AttAntonio W MoitaEmbrapa Hortaliças
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20170816/74b1c99a/attachment.html>
Mais detalhes sobre a lista de discussão R-br