R语言for循环问题

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

请教各位，在一个数据库里抽样
sample1 <- sample(alldata$id, size=5, replace=FALSE)
sample_data1 <- alldata[sample1,]
现在要生成10个sample_data，即从sample_data1到sample_data10.
请问怎样用for语句生成？？十分感谢！！

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：for循环 For R语言 Sample AMPL

10个sample_data是否允许部分重叠？

1. for (i in 1:10){
   
2.     assign(paste0("sample_date", i), alldata[sample(nrow(alldata), 5, replace = F), ])
   
3. }

复制代码

iwasguru 发表于 2017-9-17 08:16
10个sample_data是否允许部分重叠？

允许！

amrino 发表于 2017-9-17 13:26

谢谢！完美解决问题！

amrino 发表于 2017-9-17 13:26

顺便问一下，如果给每一个sample_data的class变量做一个table，如table(sample_data_1$class)。这个怎么写到循环里呢？

liulubucm 发表于 2017-9-18 05:07
顺便问一下，如果给每一个sample_data的class变量做一个table，如table(sample_data_1$class)。这个怎么写 ...

复制代码

for (i in 1:10){
  assign(paste0("sample_date", i), alldata[sample(nrow(alldata), 5, replace = F), ])
  temp <- eval(parse(text = paste0("sample_date", i, "$class")))
  print(table(temp))
}

amrino 发表于 2017-9-18 14:00

如果这样写的话，sample_data_i好像不能被识别。提示“object sample_data_i not found”

liulubucm 发表于 2017-9-18 22:39
如果这样写的话，sample_data_i好像不能被识别。提示“object sample_data_i not found”

抱歉，已经修改了

amrino 发表于 2017-9-19 23:44
抱歉，已经修改了

已经找到解决方法了，谢谢指点！