几何分布的性质及应用,几何分布的实际应用

2019独角兽企业重金招聘Python工程师标准>>>

P(灯泡在任意一天报废)=0.001，则该灯泡至少能用30天的概率P(X>=30):

Y<-dgeom(30,0.001)
> X<-pgeom(30,0.001,lower.tail=FALSE)
> X+Y
[1] 0.970431

> Y<-dgeom(30,0.001)
> X<-pgeom(30,0.001,lower.tail=FALSE)
> X+Y
[1] 0.970431> Y<-dgeom(30,0.001)
> X<-pgeom(30,0.001,lower.tail=FALSE)
> X+Y
[1] 0.970431> Y<-dgeom(30,0.001)
> X<-pgeom(30,0.001,lower.tail=FALSE)
> X+Y
[1] 0.970431> Y<-dgeom(30,0.001)
> X<-pgeom(30,0.001,lower.tail=FALSE)
> X+Y
[1] 0.970431> Y<-dgeom(30,0.001)
> X<-pgeom(30,0.001,lower.tail=FALSE)
> X+Y
[1] 0.970431> Y<-dgeom(30,0.001)
> X<-pgeom(30,0.001,lower.tail=FALSE)
> X+Y
[1] 0.970431 Y<-dgeom(30,0.001)

Y<-dgeom(30,0.001)

Y<-dgeom(30,0.001)

> Y<-dgeom(30,0.001) > X<-pgeom(30,0.001,lower.tail=FALSE) > X+Y [1] 0.970431

> Y<-dgeom(30,0.001) > X<-pgeom(30,0.001,lower.tail=FALSE) > X+Y [1] 0.970431

> Y<-dgeom(30,0.001) > X<-pgeom(30,0.001,lower.tail=FALSE) > X+Y [1] 0.970431

> Y<-dgeom(30,0.001) > X<-pgeom(30,0.001,lower.tail=FALSE) > X+Y [1] 0.970431

> Y<-dgeom(30,0.001) > X<-pgeom(30,0.001,lower.tail=FALSE) > X+Y [1] 0.970431
> Y<-dgeom(30,0.001)
> X<-pgeom(30,0.001,lower.tail=FALSE)
> X+Y
[1] 0.970431> Y<-dgeom(30,0.001)
> X<-pgeom(30,0.001,lower.tail=FALSE)
> X+Y
[1] 0.970431