编写一个简单函数
让我们编写一个本课程中常见任务的简单函数。这里，我们的函数将模拟掷骰子，并报告出现点数的总和。函数还允许用户选择要掷多少个骰子。
虽然 R 不能真的帮我们掷骰子，但我们可以用等概率从数字集合 {1, 2, 3, 4, 5, 6} 中随机抽取来模拟同等过程。使用 sample 函数就是一种实现方式。
本练习是课程的一部分
R 中的概率谜题
练习说明
- 使用
sample函数，指定size和replace参数。 - 计算掷骰结果的总和。
- 使用
return返回包含答案的对象。 - 将函数用于掷 5 个骰子的情况并运行。
交互式实操练习
通过完成这段示例代码来试试这个练习。
# Set seed to 1
set.seed(1)
# Write a function to roll k dice
roll_dice <- function(k){
all_rolls <- sample(c(1,2,3,4,5,6),
___,
replace = ___)
final_answer <- ____
return(___)
}
# Run the function to roll five dice
roll_dice(___)