2016-11-29 47 views
-3

我想产生一个循环的后续编写循环产生数据框和矩阵

a<-DF[1,] 
mymatrix1<- as.matrix(a) 

所以,我的下一行,做手工将

b<-DF[2,] 
mymatrix2<-as.matrix(b) 

和未来

c<-DF[3,] 
mymatrix3<-as.matrix(c) 

等等。我有800行。我相信r的力量不需要写出800次。

+0

我不知道有什么好处你必须与'mymatrix1','mymatrix2' ......你会不会在'DF有[1]', 'DF [2,]'.. –

+0

试试'lapply(split(DF,seq_len(nrow(DF))),as.matrix)'。真正的问题是为什么你想这样做。 – nicola

回答

0

试试这个:

for (i in 1:ncol(DF)){ 
assign(paste0('mymatrix',i),DF[,i]) 
}