|
@@ -24,7 +24,7 @@ real inverse_model_lpdf(array [] matrix actual_confusion,
|
|
|
ll += beta_proportion_lpdf(actual_confusion[k-start+1,i] | mus[i,:], etas[i,:]);
|
|
|
//ll += gamma_lpdf(actual_fp_rate[k] | alphas_fp, alphas_fp./mus_fp);
|
|
|
|
|
|
- expect[i] = (1+p)*dot_product(truth_vocs[k,:], actual_confusion[k-start+1,:,i].*(1-actual_confusion[k-start+1,:,i]));
|
|
|
+ expect[i] = (2-p)*dot_product(truth_vocs[k,:], actual_confusion[k-start+1,:,i].*(1-actual_confusion[k-start+1,:,i]));
|
|
|
//expect[i] += actual_fp_rate[k,i] * duration;
|
|
|
}
|
|
|
|