例如：抛掷硬币100次，正面向上不超过50次的概率，即pbinom(50,100,0.5)。
r语言有四个内置函数来生成二项分布。它们的描述分别如下：
dbinom(x,size,prob)函数，该函数表示每个点的概率密度分布。
pbinom(x,size,prob)函数，该函数为事件的累积概率，它表示概率的单个值。
qbinom(p,size,prob)函数，该函数采用概率值，并给出累积值与概率值匹配的数字。
rbinom(n,size,prob)函数，该函数从给定样本产生给定概率的所需数量的随机值。
其中，x是数字的向量，p是概率向量，n是观察的数量，size是试验的数量，prob是每个试验成功的概率。
用什么语言？你用两个嵌套的循环就可以搞定了。用php给你演示一下：
$result=array()
for($i=0$i<20$i++)
{
$k=0
$m=0//硬币正面出现的次数
$n=0//硬币反面出现的次数
while($k<1000)
{
$val=rand(1,2)
if($val==1)
{
$m++
}
else
{
$n++
}
$k++
}
$result[$i]=array($m,$n)
}
$j=0
foreach($result as $r)
{
echo "第".($j+1)."次的结果：正面".$r[0]."次反面".$r[1]."次<br>"
$j++
}
下面是执行结果：
第1次的结果：正面477次反面523次
第2次的结果：正面479次反面521次
第3次的结果：正面500次反面500次
第4次的结果：正面506次反面494次
第5次的结果：正面484次反面516次
第6次的结果：正面506次反面494次
第7次的结果：正面477次反面523次
第8次的结果：正面506次反面494次
第9次的结果：正面499次反面501次
第10次的结果：正面482次反面518次
第11次的结果：正面497次反面503次
第12次的结果：正面486次反面514次
第13次的结果：正面492次反面508次
第14次的结果：正面491次反面509次
第15次的结果：正面495次反面505次
第16次的结果：正面491次反面509次
第17次的结果：正面502次反面498次
第18次的结果：正面537次反面463次
第19次的结果：正面505次反面495次
第20次的结果：正面502次反面498次
利用计算机产生一个0到1均匀分布的随机数r，如果r>0.5，则正面，否则反面。
function zhengmianfanmian = yingbi()
if r>0.5
fprintf('正面')
else
fprintf('反面')
zhengmianfanmian=0
end
概率
是度量偶然事件发生可能性的数值。假如经过多次重复试验(用X代表)，偶然事件(用A代表)出现了若干次(用Y代表)。以X作分母，Y作分子，形成了数值(用P代表)。在多次试验中，P相对稳定在某一数值上，P就称为A出现的概率。如偶然事件的概率是通过长期观察或大量重复试验来确定，则这种概率为统计概率或经验概率。
