public static SEGInformedVarModelParameters GetDefaults(bool logNormalDstrn)
{
SEGInformedVarModelParameters p = new SEGInformedVarModelParameters();
p.LogNormalDstrn = logNormalDstrn;
// modifié le 31 mai 2017 (voir jl : Paramètres par défaut pour les fonctions de McGill May2017.docx)
if (p.LogNormalDstrn)
{
p.MuLower = -20;
p.MuUpper = 20;
p.LogSigmaMu = -0.1744;
p.LogSigmaPrec = 2.5523;
p.InitMu = -1.2039728043259361; /* log(0.3) */
p.InitSigma = 0.91629073187415511; /*log(2.5)*/
}
else
{
p.MuLower = 40;
p.MuUpper = 125;
p.LogSigmaMu = 1.0986122886681098; //#(GM = 3) // corrigé le 31 mai log(3)
p.LogSigmaPrec = 1.191059; //(GSD=2.5)
p.InitMu = 85;
p.InitSigma = 3;
}
return(p);
}
public SEGInformedVarModel(MeasureList measures, SEGInformedVarModelParameters specificParams, McmcParameters mcmcParams = null, PastDataSummary pastDataSummary = null)
: base(measures, specificParams.LogNormalDstrn, mcmcParams)
{
this.PastData = pastDataSummary == null ? PastDataSummary.EmptyObject : pastDataSummary;
this.Messages.Add(this.PastData.Messages);
this.LogSigmaMu = specificParams.LogSigmaMu;
this.LogSigmaPrec = specificParams.LogSigmaPrec;
this.InitSigma = specificParams.InitSigma;
this.MuLower = specificParams.MuLower;
this.MuUpper = specificParams.MuUpper;
this.InitMu = specificParams.InitMu;
this.Result = new ModelResult(this, "mu", "sd");
if (this.ME.ThroughCV)
{
this.Result.Chains.Add("cv");
}
}// end constructor
