Distribuição de probabilidade com parâmetros aleatórios

Question

É possível definir algo assim? Uma distribuição de probabilidade com parâmetros aleatórios

p = BetaDistribution[1, 1]
count = BinomialDistribution[10, p]

(* and to calculate stuff like: *)
Expectation[count]
Probability[count == 3 \[Conditioned] p > 1/2]
```

Answer 1

A distribuição de probabilidade para counté

dist = ParameterMixtureDistribution[
  BinomialDistribution[10, p],
  p \[Distributed] BetaDistribution[1, 1]]

(* BetaBinomialDistribution[1, 1, 10] *)

O valor esperado de counté Meandedist

Mean[dist]

(* 5 *)

Probability[count > 1/2, count \[Distributed] dist]

(* 10/11 *)