R 创建一个数据框，每列中都有数字

我模拟了10000个随机数

floor(runif(10000, 10,200))

但我需要数据在以下列中：

question_id choice1 choice2 choice3 choice4 correct_answer
(1-10000)    1       2       3       4         3

我如何使用R

来获得这个答案？问题id的范围是1到10000，在相应的列中重复1到4个选项，在正确答案列中随机正确回答1到4个选项。
这是您需要的吗

df  <- data.frame( question_id = seq(1:10000),choice1=1,choice2=2,choice3=3,choice4=4,correct_answer=sample(1:4,10000,T))

head(df)

  question_id choice1 choice2 choice3 choice4 correct_answer
1           1       1       2       3       4              1
2           2       1       2       3       4              3
3           3       1       2       3       4              2
4           4       1       2       3       4              1
5           5       1       2       3       4              1
6           6       1       2       3       4              2

df不清楚您想要什么可能是
data.frame（问题id=sample（10000），选项1=1，选项2=2，选项3=3，选项4=4，正确答案=sample（1:410000，T））
？我也不太清楚。我有没有做过数据。框架（列表（候选者id=c（1:10000），问题id=seq（1:10000），choice1=rep（110000），choice2=rep（210000），choice3=rep（310000），choice4=rep（410000）），而不是
floor（runif（…）
使用
sample
。请看我的评论。我把它当作OP的。但你当然有道理。我将相应地进行编辑