从1—9中取三个数相加和为偶数的概率

思路 有3个是偶数 +1个偶数且2个奇数

数学表达式

R语言的模拟 

使用sample函数

sample(x,n,replacement)

x是抽样样本，n是你抽取的样本量，replacement是否重复抽样，p抽取每个样本的概率

模拟程序如下

N <- 100000
count <- 0
for(i in 1:N)
{
  if(sum(sample(1:9,3,replace = F))%%2==0)
  {
    count <- count + 1
  }
}
count/N