Skip to content
Prev 126702 / 398500 Next

rearrange data columns

On 11 Oct 2007, at 12:55, Martin Ivanov wrote:

            
> a
      [,1] [,2] [,3]
[1,]    1    2    3
[2,]    4    5    6
 > b
      [,1] [,2] [,3]
[1,]   -1   -2   -3
[2,]   -4   -5   -6

 > x <- cbind(a,b)+NA
 > x
      [,1] [,2] [,3] [,4] [,5] [,6]
[1,]   NA   NA   NA   NA   NA   NA
[2,]   NA   NA   NA   NA   NA   NA
 > x[,seq(from=1,by=2,len=3)] <- a
 > x[,seq(from=2,by=2,len=3)] <- b
 > x
      [,1] [,2] [,3] [,4] [,5] [,6]
[1,]    1   -1    2   -2    3   -3
[2,]    4   -4    5   -5    6   -6
 >


HTH

rksh
--
Robin Hankin
Uncertainty Analyst
National Oceanography Centre, Southampton
European Way, Southampton SO14 3ZH, UK
  tel  023-8059-7743