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