1、二项分布:
n<-25
p<-0.3
k<-seq(0,n)
plot(k,dbinom(k,n,p),type='h',main="Binomial distribution",xlab="k")

2、泊松分布:
lambda<-3.0
k<-seq(0,30)
plot(k,dpois(k,lambda),type='h',main="Poisson distribution",xlab="k")

3、几何分布:
p<-0.6
k<-seq(0,20)
plot(k,dgeom(k,p),type='h',main="Geometric distribution",xlab="k")
