循环中遇到了一些问题

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

我有一个44*100的数据框I，我想用两重循环将其中所有的数据放进另一个数据框K的一列，因为I中有部分是空的，所以在转换中想把它剔除，但是目前输出的结果K完全不是I中的数据，想请教各位是哪里出错了？


I <- read.table('IDregion.txt',fill=TRUE,sep='<',header = FALSE)
I<- data.frame(I)
K<- c(1)
K<- data.frame(K)
i=1
j=1
a=1
while( i<45 ){
               while(j<101){
                 if( I[i,j]!='NA'){
               I[i,j]->K[a,1]
               a<-a+1}
               j<-j+1 }
               i<-i+1
               j<-1}

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：哪里出错了 数据框

求教求教~

没看明白你的程序要干嘛。。。如果只是想把I的数据放到一列K中，不用那么麻烦：

1. a <- as.matrix(I)
   
2. K <- c(a)
   
3. K <- K[K!='']#如果I里面都是数字型的，缺失值是NA，改行改为 K<- K[!is.na(K)]
   
4. K <- as.data.frame(K)

复制代码

前面不变

K<- c()

i=1
j=1
a=1
while( i<45 ){
               while(j<101){
                 if( I[i,j]!='NA'){
               K <- c(K, I[i,j])
               a<-a+1}
               j<-j+1 }
               i<-i+1
               j<-1}

K<- data.frame(K)

abc2012202632 发表于 2017-9-12 10:38
没看明白你的程序要干嘛。。。如果只是想把I的数据放到一列K中，不用那么麻烦：

没错是这个意思！谢谢指教！

xmark 发表于 2017-9-12 12:14
前面不变

K

K <- c(K, I[i,j]这一步真是妙啊，谢谢指教！