.. se lanciassi mille volte una monetina, realmente, quante volte otterrei testa e quante volte croce?
Possiamo provare a fare una simulazione con R. Basta fare un semplice copia e incolla. Copiate tutto il blocco di istruzioni rosse scritte qui di seguito:
moneta <- c(0,1)
millelanci <- sample(moneta, 1000, replace = TRUE)
millelanci
sum(millelanci)
e incollatelo nella finestra bianca che trovate in questo webclient offerto dall'Università di Palermo, e premete il pulsante Send, lì in basso.
Il numero visualizzato rappresenta il numero di successi che avete ottenuto.
Ripetete di nuovo l'operazione: otterrete un risultato diverso (ma pur sempre vicino a 500).
Spiegazione facoltativa.
Il comando moneta <- c(0,1) crea un vettore, di nome moneta, che contiene due elementi: lo 0 e l'1 (il simbolo <- , che si ottiene premendo minore < e meno -, si legge "assegna")
Il comando sample estrae casualmente uno dei due valori di moneta, 0 oppure od 1. L'opzione replace = TRUE permette di "reimbussolare" l'estrazione, e ricominciare con una nuova estrazione casuale, ripetendo il tutto per 1000 volte. Le estrazioni generano un vettore di nome millelanci.
Il semplice comando millelanci mostra i mille valori casuali ottenuti.
Infine, sum(millelanci)calcola la somma dei valori di millelanci. Siccome si tratta di 0 ed 1, la somma rappresenta anche il numero complessivo di successi.