Hi, Is this intended behaviour of cbind?
> a<-c(0,1,2,3) > a [1] 0 1 2 3 > a<-as.ordered(a) > a [1] 0 1 2 3 Levels: 0 < 1 < 2 < 3 > a<-a[a!=0] #remove the zero from a > a [1] 1 2 3 Levels: 0 < 1 < 2 < 3 > cbind(a) a [1,] 2 [2,] 3 [3,] 4 #cbind adds +1 to each element > a<-as.ordered(as.vector(a)) > a [1] 1 2 3 Levels: 1 < 2 < 3 > cbind(a) a [1,] 1 [2,] 2 [3,] 3 #now it works... I am running R 2.3.0 on a windows system. Regards, Dirk Vandekerckhove ______________________________________________ R-help@stat.math.ethz.ch mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html