Se você jogar uma moeda e receber 268 caras e 98 coroas, poderá calcular a probabilidade de que a moeda seja justa de várias maneiras. Uma observação heurística simples provavelmente concluiria que tal moeda é injusta. Eu calculei o valor p em R com:
> coin <- pbinom(98, 366, 0.5)
> coin*2
[1] 2.214369e-19
Esse valor é menor que 0,05, portanto rejeitamos a hipótese de que seja uma moeda justa.
Mas e se você dissesse que a mesma moeda caiu de lado 676 vezes durante o julgamento. Heuristicamente, você provavelmente chegará à mesma conclusão, mas os testes típicos de moedas justas ainda serão válidos?
Aqui está um gráfico para ilustrar o problema:

Quais são os métodos válidos para testar a hipótese de que há igual probabilidade de um evento ocorrer nas áreas sombreadas?
NOTA: existem 629 movimentos positivos (413 negativos) na ilustração do gráfico.
Código R que gera os dados:
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
