Loto: long term datasets
Load the historical data at  Historique LOTO®(entre octobre 2008 et mars 2017)Format Zip (69Ko)    path <- "nouveau_loto.csv"   historique <- read.csv2(file=path, header=TRUE, stringsAsFactors=FALSE)  range(c(historique$boule_1, historique$boule_2, historique$boule_3,          historique$boule_4, historique$boule_5))  hist(c(historique$boule_1, historique$boule_2, historique$boule_3,         historique$boule_4, historique$boule_5), breaks = 0:49,       xlab="Boules", ylab="Nombre de tirages", main="Tirage du loto de 2008 à 2017")   length(c(historique$boule_1, historique$boule_2, historique$boule_3,           historique$boule_4, historique$boule_5))/(49-1+1)    limites <- getFromNamespace(".BinomialConfidence", ns="HelpersMG")(length(c(historique$boule_1, historique$boule_2, historique$boule_3,                              ...