gioco1 {labstatR}

Simula la scommessa di De Mere

Description

Questa funzione simula la scommessa di de Mere calcolando la probabilita' di fare almeno un 6 in 4 lanci di un dado regolare.

Usage

gioco1(prove=10000)
gioco1a(prove=10000)

Arguments

prove

numero di prove da utilizzare nella simulazione

Details

La versione gioco1 della funzione non e' efficiente in termini di velocita' in quanto vengono impiegati cicli for. Si noti la differenza in termini di velocita' con la version gioco1a.

See Also

gioco2.

Examples

ptm <- proc.time()
gioco1a(10000)
proc.time() - ptm
ptm <- proc.time()
gioco1(10000)
proc.time() - ptm