[R] Data Frame Transpose
John Kane
jrkrideau at yahoo.ca
Tue Jan 5 17:06:37 CET 2010
Well, if nothing else, you have missing comma. :)
x01=y[,1]), x01=y[,1], x02=y[,2], x03=y[,3]
--
>
> fn <- function(x) {
> y <- t(x[,2])
> data.frame( Croptype=x[1,1], Period =x[1,2],
> name=colnames(x)[2],
> x01=y[,1])x01=y[,1], x02=y[,2], x03=y[,3] }
> <---------------Problem
> here
>
> m <- do.call( "rbind",
> lapply(split(m,list(m$Period,m$Croptype)),fn) )
>
> m <- m[order(m$Period,m$Croptype),]
>
>
> I think I having a problem in here: x01=y[,1])x01=y[,1],
> x02=y[,2],
> x03=y[,3]. how to address with my data. I have variable
> Period.
>
> based on this http://www.mail-archive.com/r-help@stat.math.ethz.ch/msg09264.html
>
> P_ID Croptype Period Ini_Age Area_Cut
> 83 SORI 1
> 31 528.2465512
> 84 SORI 1
> 32 74.55179899
> 85 SORI 1
> 33 72.45778618
> 86 SORI 1
> 34 139.5272947
> 82 SORI 2
> 28 1.711642933
> 83 SORI 2
> 29 2.500000071
> 84 SORI 2
> 30 432.5139327
> 93 ORM 2
> 35 316.8422545
> 62 OTRM 3
> 30 64.60526438
> 82 SORI 3
> 27 26.93674606
> 3 SORM 3
> 35 223.3658345
> 82 SORI 4
> 26 2.500000071
> 4 SORM 4
> 34 1008.643
> 5 OTRI 5
> 25 32.42603214
> 5 OTRM 5
> 29 65.9031344
> 5 SORM 5
> 32 223.1489321
> 5 SORM 5
> 33 72.59203041
> 5 SORM 5
> 35 222.8402746
> 6 OTRI 6
> 22 2.499999851
> 6 OTRI 6
> 23 3.374626509
> 6 OTRI 6
> 24 96.13462257
> 6 OTRM 6
> 26 830.7463641
> 6 OTRM 6
> 27 731.6228643
> 6 OTRM 6
> 28 16.3519762
> 7 OTRM 7
> 26 1636.5693
> 8 OTRM 8
> 26 553.0050146
> 9 OTRM 9
> 26 894.414033
> 10 OTRM 10
> 24 38.72597099
> 10 OTRM 10
> 25 308.6452707
> 10 OTRM 10
> 26 786.1761969
> 10 SORM 10
> 31 235.8360136
>
> To this.
>
> P_ID Croptype P1 P2
> P3 P4
> P5 P6
> P7
> P8 P9
> P10
> 83 SORI 31
> 84 SORI 32
> 85 SORI 33
> 86 SORI 34
> 82 SORI
> 28
> 83 SORI
> 29
> 84 SORI
> 30
> 93 SORM
> 35
> 62 OTRM
> 30
> 82 SORI
> 27
> 3 SORM
> 35
> 82 SORI
>
> 26
> 4 SORM
>
> 34
> 5 OTRI
>
> 25
> 5 OTRM
>
> 29
> 5 SORM
>
> 32
> 5 SORM
>
> 33
> 5 SORM
>
> 35
> 6 OTRI
>
>
> 22
> 6 OTRI
>
>
> 23
> 6 OTRI
>
>
> 24
> 6 OTRM
>
>
> 26
> 6 OTRM
>
>
> 27
> 6 OTRM
>
>
> 28
> 7 OTRM
>
>
> 26
> 8 OTRM
>
>
>
> 26
> 9 OTRM
>
> Thanks in advance. Noli
>
> ______________________________________________
> 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.
>
__________________________________________________________________
Yahoo! Canada Toolbar: Search from anywhere on the web, and bookmark your favourite sites. Download it now
http://ca.toolbar.yahoo.com.
More information about the R-help
mailing list