Cara ou coroa com prop_model

A função prop_model já foi carregada no seu ambiente. Ela implementa um modelo Bayesiano que assume que:

• Os data são um vetor de sucessos e fracassos representados por 1s e 0s.
• Existe uma proporção subjacente de sucesso desconhecida.
• Antes de ser atualizada com dados, qualquer proporção subjacente de sucesso é igualmente provável.

Suponha que você acabou de lançar uma moeda quatro vezes e o resultado foi cara, coroa, coroa, cara. Se você codificar cara como sucesso e coroa como fracasso, então o R abaixo executa prop_model com esses dados

data <- c(1, 0, 0, 1)
prop_model(data)