我想在我的计算机编程类中使用R来解决这个问题；
"一个房间里有100个人。每个人都有100美元。每个人随机给另一个人1美元。当这种情况重复100万次时，收入分配会是什么？">
我知道我应该使用循环，因为它会重复很多次，但我找不到如何写其他部分。我是R程序的初学者。谢谢你的回答
library(dplyr)
dfdf <- data.frame(
People = c(1:100),
Money = rep(100,100)
)
for (i in 1:1000000){
index <- which(dfdf$Money>0)
index_2 <-sample(index, length(index)/2)
dfdf[index_2, 2] <- dfdf[index_2, 2] - 1
dfdf[-index_2, 2] <- dfdf[-index_2, 2] + 1
}
hist(dfdf$Money)
这是你学习的作品吗？