Message-ID: <79CB0E4C3A6.00000466jrkrideau@inbox.com>
Date: 2012-07-24T18:17:40Z
From: John Kane
Subject: Simple reshape problem I am completely missing
In-Reply-To: <1343151918.1237.YahooMailNeo@web142601.mail.bf1.yahoo.com>
Looks like it. thanks
Now all I have to do is figgure out how to get rid of all the missing combos. Oh well another dat
thanks
John Kane
Kingston ON Canada
> -----Original Message-----
> From: smartpink111 at yahoo.com
> Sent: Tue, 24 Jul 2012 10:45:18 -0700 (PDT)
> To: jrkrideau at inbox.com
> Subject: Re: [R] Simple reshape problem I am completely missing
>
> HI,
>
> I think your group and tps variables have a lot of levels, so the
> combinations which are not there might end up as NA.
>
>
> Try this:
> ?md4<-data.frame(group=c(rep("X1",3),rep("X2",3)),tps=c("L","R","P","L","R","P"),sum=rnorm(6,15))
>> md4
> ? group tps????? sum
> 1??? X1?? L 13.94542
> 2??? X1?? R 14.34785
> 3??? X1?? P 15.31574
> 4??? X2?? L 14.50404
> 5??? X2?? R 13.73331
> 6??? X2?? P 14.69673
> >? dd? <-? dcast(md4, group~tps, value.var="sum")
>> dd
> ? group??????? L??????? P??????? R
> 1??? X1 13.94542 15.31574 14.34785
> 2??? X2 14.50404 14.69673 13.73331
>
> A.K.
>
>
>
>
> ----- Original Message -----
> From: John Kane <jrkrideau at inbox.com>
> To: r-help at r-project.org
> Cc:
> Sent: Tuesday, July 24, 2012 1:17 PM
> Subject: [R] Simple reshape problem I am completely missing
>
> I seem to be doing something really stupid or missing something really
> obvious? but what?
>
> I have a simple three column data.frame that I would like to reshape to
> wide preferably using reshape2.
>
> An example from
http://stackoverflow.com/questions/9617348/reshape-three-column-data-frame-to-matrix
> looked perfect except I wanted a data frame but it seemed okay. I just
> changed acast to dcast and it seems fine.
>
> Stackoverflow example:
> tmp <- data.frame(x=gl(2,3, labels=letters[24:25]),
> ? ? ? ? ? ? ? ? ? y=gl(3,1,6, labels=letters[1:3]),
> ? ? ? ? ? ? ? ? ? z=c(1,2,3,3,3,2))
> dd? <-? dcast(tmp, x~y, value.var="z")
>
> My Example: Does NOT work
>
> md2? <-? structure(list(group = structure(c(1L, 1L, 1L, 2L, 2L, 3L, 3L,
> 4L, 4L, 4L, 5L, 5L, 6L, 6L, 7L, 7L, 7L, 8L, 8L), .Label = c("X1",
> "X2", "X3", "X4", "X5", "X6", "X7", "X8"), class = "factor"),
> ? ? tps = structure(c(7L, 12L, 14L, 4L, 8L, 9L, 16L, 6L, 7L,
> ? ? 11L, 6L, 15L, 10L, 13L, 3L, 4L, 5L, 1L, 2L), .Label = c("A",
> ? ? "C", "D", "E", "G", "I", "L", "M", "N", "P", "Q", "R", "S",
> ? ? "T", "V", "Y"), class = "factor"), sum = c(0.914913196595112,
> ? ? 0.0367565080432513, 0.0483302953616366, 0.982727803634948,
> ? ? 0.0172721963650521, 0.0483302953616366, 0.951669704638363,
> ? ? 0.89764100023006, 0.0850868034048879, 0.0172721963650521,
> ? ? 0.951669704638363, 0.0483302953616366, 0.963243491956749,
> ? ? 0.0367565080432513, 0.89764100023006, 0.0540287044083034,
> ? ? 0.0483302953616366, 0.982727803634948, 0.0172721963650521
> ? ? )), .Names = c("group", "tps", "sum"), row.names = c(NA,
> -19L), class = "data.frame")
>
> dcast(md2,? group ~ tps , value.vars? = "sum")
>
>
> What am I doing wrong?
>
> John Kane
> Kingston ON Canada
>
> ____________________________________________________________
> FREE ONLINE PHOTOSHARING - Share your photos online with your friends and
> family!
> Visit http://www.inbox.com/photosharing to find out more!
>
> ______________________________________________
> R-help at r-project.org mailing list
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide
> http://www.R-project.org/posting-guide.html
> and provide commented, minimal, self-contained, reproducible code.
____________________________________________________________
FREE 3D EARTH SCREENSAVER - Watch the Earth right on your desktop!