如何在 R 中使用 sum 函数？

【问题标题】：How can I use sum function in R?如何在 R 中使用 sum 函数？
【发布时间】：2020-05-03 11:16:50
【问题描述】：

这是我在这里的第一篇文章，我找不到我正在寻找的答案。我目前正在学习关于数据科学概率的 edX 课程，但我卡在了第 1 部分。该任务要求您模拟一系列 6 场比赛，随机、独立的结果为输 (0) 或赢 (1)，然后使用 sum 函数确定模拟系列是否至少包含 4 场胜利。这是我所做的：

l <- list(0:1)

n <- 6

games <- expand.grid(rep(l, n))

games <- paste (games$Var1, games$Var2, games$Var3, games$Var4, games$Var5, games$Var6)
sample (game, 1, replace = TRUE)

但我似乎无法使用 sum 函数来对 '''sample''' 的结果求和并检查是否有一系列至少 4 场比赛。我一直在尝试使用 sum(sample (game, 1, replace = TRUE)) 但似乎无处可去。

任何灯都将不胜感激！非常感谢！

【问题讨论】：

标签： r statistics probability

【解决方案1】：

这是一个模拟系列的样子

sample(c(0, 1), 6, replace = TRUE)

要计算获胜次数（即 1），您可以使用 sum like

sum(sample(c(0, 1), 6, replace = TRUE)) >= 4

现在您可以使用replicate 生成这样的系列n 次。

n <- 1000
replicate(n, sum(sample(c(0, 1), 6, replace = TRUE)) >= 4)

如果你必须使用games 来计算，你可以使用rowSums 来计算 1 的个数

sum(rowSums(games) >= 4)
#[1] 22

【讨论】：

这正是我正在寻找的答案。我想我需要熟悉语法。