In attesa del primo lancio testa

Inizierai simulando una serie di lanci di moneta e "aspettando" la prima testa.

Questo esercizio fa parte del corso

Fondamenti di probabilità in R

Simula 100 istanze del lancio di una singola moneta con una probabilità del 20% di testa e salvale nella variabile flips. (Quindi, flips deve essere un vettore di lunghezza 100).
Usa which() per trovare il primo caso in cui la moneta risulta testa.

Prova a risolvere questo esercizio completando il codice di esempio.

# Simulate 100 instances of flipping a 20% coin
flips <- ___

# Use which to find the first case of 1 ("heads")
which(___)[1]