Reprezentarea grafică a probabilității că o mașinărie funcționează în continuare

Dacă ai fi un supervizor la fabrica cu mașinăria nesigură, ai vrea să înțelegi cât de probabilă este funcționarea continuă a acesteia în timp. În acest exercițiu, vei reprezenta grafic probabilitatea că mașinăria funcționează în primele 30 de zile.

Acest exercițiu face parte din cursul

Bazele probabilității în R

Vezi cursul

Instrucțiuni pentru exercițiu

Calculează un vector de probabilități care să indice dacă mașinăria funcționează în continuare în fiecare zi, de la ziua 1 până la ziua 30, și salvează-l ca still_working. Poți face acest lucru cu un singur apel la pgeom(), transmițând un vector de numere ca prim argument. Mașinăria are o șansă de 10% să se defecteze în fiecare zi.
Rulează comanda qplot(still_working) pentru a reprezenta grafic probabilitatea că mașinăria funcționează în fiecare dintre primele 30 de zile, cu ziua pe axa x și probabilitatea pe axa y.

Exercițiu interactiv practic

Încearcă acest exercițiu completând acest cod de exemplu.

# Calculate the probability of machine working on day 1-30
still_working <-

# Plot the probability for days 1 to 30
qplot(1:30, still_working)

Editează și rulează codul