我从数据帧中抽取了一个随机样本。但是我不知道如何获得剩余的数据帧。
df <- data.frame(x=rep(1:3,each=2),y=6:1,z=letters[1:6])
#select 3 random rows
df[sample(nrow(df),3)]
我想要的是获得其余3行的剩余数据帧。
sample
每次运行时都设置一个随机种子,因此,如果要重现其结果,则需要set.seed
将其结果保存或保存在变量中。
解决您的问题,您只需要-
在索引之前添加即可获取其余数据集。另外,indx
如果要选择行,请不要忘记在逗号后添加逗号(与您的问题不同)
set.seed(1)
indx <- sample(nrow(df), 3)
您的子集
df[indx, ]
# x y z
# 2 1 5 b
# 6 3 1 f
# 3 2 4 c
剩余数据集
df[-indx, ]
# x y z
# 1 1 6 a
# 4 2 3 d
# 5 3 2 e
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句