/// <include file='FactorDocs.xml' path='factor_docs/message_op_class[@name="IndexOfMaximumOp"]/message_doc[@name="LogAverageFactor{GaussianList}(IndexOfMaximumBuffer, GaussianList, int)"]/*'/>
/// <typeparam name="GaussianList">The type of an incoming message from <c>list</c>.</typeparam>
public static double LogAverageFactor <GaussianList>(IndexOfMaximumBuffer Buffer, GaussianList list, int IndexOfMaximumDouble)
where GaussianList : IList <Gaussian>
{
double evidence = 0;
var max_marginal = list[IndexOfMaximumDouble] * Buffer.to_list[IndexOfMaximumDouble];
for (int c = 0; c < list.Count; c++)
{
if (c != IndexOfMaximumDouble)
{
var msg_to_sum = max_marginal / Buffer.MessagesToMax[c];
var msg_to_positiveop = DoublePlusOp.AAverageConditional(Sum: msg_to_sum, b: list[c]);
evidence += IsPositiveOp.LogEvidenceRatio(true, msg_to_positiveop);
// sum operator does not contribute because no projection is involved
// the x[index]-x[c] variable does not contribute because it only connects to two factors
evidence -= msg_to_sum.GetLogAverageOf(Buffer.MessagesToMax[c]);
if (max_marginal.IsPointMass)
{
evidence += Buffer.MessagesToMax[c].GetLogAverageOf(max_marginal);
}
else
{
evidence -= Buffer.MessagesToMax[c].GetLogNormalizer();
}
}
}
//evidence += ReplicateOp.LogEvidenceRatio<Gaussian>(MessagesToMax, list[IndexOfMaximumDouble], MessagesToMax.Select(o => max_marginal / o).ToArray());
if (!max_marginal.IsPointMass)
{
evidence += max_marginal.GetLogNormalizer() - list[IndexOfMaximumDouble].GetLogNormalizer();
}
//evidence -= Buffer.MessagesToMax.Sum(o => o.GetLogNormalizer());
//evidence -= Buffer.MessagesToMax.Sum(o => (max_marginal / o).GetLogAverageOf(o));
return(evidence);
}
/// <include file='FactorDocs.xml' path='factor_docs/message_op_class[@name="IndexOfMaximumOp"]/message_doc[@name="Buffer{GaussianList}(IndexOfMaximumBuffer, GaussianList, int)"]/*'/>
/// <typeparam name="GaussianList">The type of an incoming message from <c>list</c>.</typeparam>
public static IndexOfMaximumBuffer Buffer <GaussianList>(
IndexOfMaximumBuffer Buffer, GaussianList list, int IndexOfMaximumDouble) // redundant parameters required for correct dependency graph
where GaussianList : IList <Gaussian>
{
var max_marginal = Buffer.to_list[IndexOfMaximumDouble] * list[IndexOfMaximumDouble];
Gaussian product = Gaussian.Uniform();
//var order = Rand.Perm(list.Count);
for (int i = 0; i < list.Count; i++)
{
//int c = order[i];
int c = i;
if (c != IndexOfMaximumDouble)
{
var msg_to_sum = max_marginal / Buffer.MessagesToMax[c];
var msg_to_positiveop = DoublePlusOp.AAverageConditional(Sum: msg_to_sum, b: list[c]);
var msgFromPositiveOp = IsPositiveOp.XAverageConditional(true, msg_to_positiveop);
Buffer.MessagesToMax[c] = DoublePlusOp.SumAverageConditional(list[c], msgFromPositiveOp);
Buffer.to_list[c] = DoublePlusOp.AAverageConditional(Sum: msg_to_sum, b: msgFromPositiveOp);
max_marginal = msg_to_sum * Buffer.MessagesToMax[c];
product.SetToProduct(product, Buffer.MessagesToMax[c]);
}
}
//Buffer.to_list[IndexOfMaximumDouble] = max_marginal / list[IndexOfMaximumDouble];
Buffer.to_list[IndexOfMaximumDouble] = product;
return(Buffer);
}
/// <summary>
/// Returns the probability that A>B
/// </summary>
/// <param name="A"></param>
/// <param name="B"></param>
/// <returns></returns>
private static Bernoulli ProbGreater(Gaussian A, Gaussian B)
{
Gaussian diff = DoublePlusOp.AAverageConditional(Sum: A, b: B);
return(IsPositiveOp.IsPositiveAverageConditional(diff));
}
/// <include file='FactorDocs.xml' path='factor_docs/message_op_class[@name="IsPositiveOp_Proper"]/message_doc[@name="XAverageConditional(Bernoulli, Gaussian)"]/*'/>
public static Gaussian XAverageConditional([SkipIfUniform] Bernoulli isPositive, [SkipIfUniform, Proper] Gaussian x)
{
return(IsPositiveOp.XAverageConditional_Helper(isPositive, x, forceProper: true));
}
