powered by
Interpreta \(P\) y \(LT\) como proporciones convertidas a pseudo-cuentas con concentración total \(\alpha_{base}=1/\gamma\). El posterior medio es \(W = (P\,\alpha_{base} + LT\,\alpha_{base}) / \mathrm{rowSums}(\cdot)\).
posterior_dirichlet(P, LT, gamma = 0.1)
Posterior matrix \(W\) (\(T \times K\)), filas suman 1.
Prior matrix (\(T \times K\)); filas no negativas que suman 1 (o cercanas).
Likelihood matrix (\(T \times K\)); filas no negativas que suman 1 (o cercanas).
Positive uncertainty factor (default 0.1); menor \(\gamma\) implica mayor concentración (más “seguro”).
0.1
posterior_weighted, posterior_multiplicative, posterior_adaptive
posterior_weighted
posterior_multiplicative
posterior_adaptive
T <- 6; K <- 3 P <- matrix(runif(T*K), T); P <- P / rowSums(P) LT <- matrix(runif(T*K), T); LT <- LT / rowSums(LT) W <- posterior_dirichlet(P, LT, gamma = 0.1)
Run the code above in your browser using DataLab