全部版块 我的主页
论坛 数据科学与人工智能 数据分析与数据科学 R语言论坛
3669 1
2017-10-16
我在改数据的格式的时候,很奇怪,同样的代码有些数据可以跑,有些却不可以跑,出现missing value where TRUE/FALSE needed。下面附上代码,大家帮我看下是咋回事
#出现相同id时下面加上一行 NA NA NA NA #

bay_1=data.frame()
for (i in 1:){
  if(table(song$id)==3){
    bay_1=rbind(bay_1,song[song$id==i,])
  }
  if(table(song$id)==2){
    temp=c(i,"NA","NA","NA","NA")
    bay_1=rbind(bay_1,song[song$id==i,],temp)
    rm(temp)
  }
}
bay_1


不能跑的数据如下


idtmeansd
18 -76 35
11 -68 35
23 -32 27
21 -32 25
36 -3 2
34 -3 2
42 -48 26
41 -38 27
52-16 26
51-40 27
58-45 27
69 -63 25
64 -67 21
62 -56 23
75 -7 3
71 -6 4
85 -5 3
81 -5 3
98 -22 17
92 -24 21
91 -14 17
102 -6 17
1013 -5 16
112 0 1
119 0 1
1313 -6 2
132 -4 2
142 -45 21
147 -38 21
1510 -5 3
159 -3 4
168 -32 25
161 -38 25
179 -5 2
171 -5 2
187 -41 19
182 -41 19
197 -1 2
192 -1 2
2012 -4 2
2011 -4 2
2113 -41 20
2111 -41 19
223 -47 16
221 -24 20
233 -42 19
231 -12 26
243 -32 27
241 -32 25
251 -2 3
253 -2 3


二维码

扫码加我 拉你入群

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

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

全部回复
2017-10-16 20:24:01
for (i in 1:51){
  if(table(song$id)[i]==3){
    bay_1=rbind(bay_1,song[song$id==i,])
  }
  if(table(song$id)[i]==2){
    temp=c(i,"NA","NA","NA","NA")
    bay_1=rbind(bay_1,song[song$id==i,],temp)
    rm(temp)
  }
}
bay_1
二维码

扫码加我 拉你入群

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

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

相关推荐
栏目导航
热门文章
推荐文章

分享

扫码加好友,拉您进群
各岗位、行业、专业交流群