如何在R中找到两次掷骰子的每个结果的最大值？
要找到两次掷骰子的每个结果的最大值，我们可以按照以下步骤操作-
使用expand.grid函数创建两次掷骰子的结果。
使用pmin函数查找每个结果的最大值。
产生两次掷骰子的结果
使用expand.grid函数创建两次掷骰子的结果，如下所示-
M<-expand.grid(rep(list(1:6),2)) M
执行时，上述脚本生成以下内容output(thisoutputwillvaryonyoursystemduetorandomization)-
Var1 Var2 1 1 1 2 2 1 3 3 1 4 4 1 5 5 1 6 6 1 7 1 2 8 2 2 9 3 2 10 4 2 11 5 2 12 6 2 13 1 3 14 2 3 15 3 3 16 4 3 17 5 3 18 6 3 19 1 4 20 2 4 21 3 4 22 4 4 23 5 4 24 6 4 25 1 5 26 2 5 27 3 5 28 4 5 29 5 5 30 6 5 31 1 6 32 2 6 33 3 6 34 4 6 35 5 6 36 6 6
找出每个投掷结果的最大值
使用pmax函数查找每次掷骰子的最大值-
M<-expand.grid(rep(list(1:6),2)) do.call(pmax,M)
输出
[1] 1 2 3 4 5 6 2 2 3 4 5 6 3 3 3 4 5 6 4 4 4 4 5 6 5 5 5 5 5 6 6 6 6 6 6 6