Si vous lancez une pièce et obtenez 268 têtes et 98 queues, vous pouvez calculer la probabilité que la pièce soit équitable de plusieurs façons. Une simple observation heuristique aurait très probablement conclu qu'une telle pièce est injuste. J'ai calculé la valeur de p dans R avec:
> coin <- pbinom(98, 366, 0.5)
> coin*2
[1] 2.214369e-19
Cette valeur est inférieure à 0,05, ergo nous rejetons l'hypothèse que c'est une pièce équitable.
Mais que se passe-t-il si vous avez dit que la même pièce a atterri sur son côté 676 fois pendant le procès. Heureusement, vous arriverez probablement à la même conclusion, mais les tests de pièces justes typiques seraient-ils toujours valables?
Voici un graphique pour illustrer le problème:
Quelles sont les méthodes valides pour tester l'hypothèse selon laquelle il existe une probabilité égale qu'un événement se produise dans les zones ombrées?
REMARQUE: il y a 629 mouvements positifs (413 négatifs) dans l'illustration du graphique.
Code R qui génère les données:
require("quantmod")
ticker <- getSymbols("SLV")[,6]
change <- (ticker - lag(ticker, 24)) / lag(ticker, 24)
change <- na.locf(change, na.rm=TRUE)
# some other calculations
dens <- density(change)
plot(dens)
# some formatting stuff