Question

Mathematica或者origin或者excel ，如何绘制二项分布的曲线

首先定义函数:
binomial[ N_, p_ , x_] := Binomial[ N, x] p^x (1 - p)^(N - x)
运行Plot[ binomial[ 20, 0.5, x], {x, 0, 20}]

但是，当我把N从20改到100、1000时，纵坐标明显范围不够，这时候图像就不完全了，在中间处显示出两条竖线，怎么办？

Answer 1

加入参数即可,
Plot[binomial[1000, 0.3, x], {x, 0, 1000}, PlotRange -> All]
此参数使得显示所有纵轴范围.

Answer 2

这个我可以做的,http://hi.baidu.com/ggggwhw/blog/item/1ed2d35d5130b95efaf2c07b.html