attempt to resolve "credibleIntervalToDistribution"
This commit is contained in:
parent
27609cd058
commit
516627629f
|
@ -188,14 +188,15 @@ module SymbolicConstructors = {
|
||||||
|
|
||||||
let twoFloat = name =>
|
let twoFloat = name =>
|
||||||
switch name {
|
switch name {
|
||||||
| "normal" => Ok(SymbolicDist.Normal.make)
|
|
||||||
| "uniform" => Ok(SymbolicDist.Uniform.make)
|
|
||||||
| "beta" => Ok(SymbolicDist.Beta.make)
|
| "beta" => Ok(SymbolicDist.Beta.make)
|
||||||
| "lognormal" => Ok(SymbolicDist.Lognormal.make)
|
|
||||||
| "logistic" => Ok(SymbolicDist.Logistic.make)
|
|
||||||
| "cauchy" => Ok(SymbolicDist.Cauchy.make)
|
| "cauchy" => Ok(SymbolicDist.Cauchy.make)
|
||||||
|
| "credibleIntervalToDistribution" => Ok(SymbolicDist.From90thPercentile.make)
|
||||||
| "gamma" => Ok(SymbolicDist.Gamma.make)
|
| "gamma" => Ok(SymbolicDist.Gamma.make)
|
||||||
| "to" => Ok(SymbolicDist.From90thPercentile.make)
|
| "logistic" => Ok(SymbolicDist.Logistic.make)
|
||||||
|
| "lognormal" => Ok(SymbolicDist.Lognormal.make)
|
||||||
|
| "normal" => Ok(SymbolicDist.Normal.make)
|
||||||
|
| "to" => Ok(SymbolicDist.From90thPercentile.make) // as credibleIntervalToDistribution is defined "to" might be redundant
|
||||||
|
| "uniform" => Ok(SymbolicDist.Uniform.make)
|
||||||
| _ => Error("Unreachable state")
|
| _ => Error("Unreachable state")
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue
Block a user