Kans dat een machine X dagen meegaat
Er komt een nieuwe machine aan in een fabriek. Dit type machine is erg onbetrouwbaar: elke dag is er 10% kans dat hij definitief kapot gaat. Hoe lang verwacht je dat hij meegaat?
Dit wordt beschreven door de cumulatieve verdeling van de geometrische verdeling, en dus de functie pgeom(). pgeom(X, .1) geeft de kans dat er X werkende dagen zijn vóór de dag dat hij kapot gaat (dus dat hij op dag X + 1 kapot gaat).
Deze oefening maakt deel uit van de cursus
Basis van kansrekening in R
Oefeninstructies
- Gebruik
pgeom()om de kans te vinden dat de machine op de 5e dag of eerder kapot gaat. - Gebruik
pgeom()om de kans te vinden dat de machine aan het einde van de 20e dag nog werkt.
Interactieve oefening met praktijkervaring
Probeer deze oefening door deze voorbeeldcode aan te vullen.
# Find the probability the machine breaks on 5th day or earlier
# Find the probability the machine is still working on 20th day