R/is.mostLikelyEvent.R

is.mostLikelyEvent  <- function(Probability.Table, event, threshold.vector) {
  return(as.numeric(Probability.Table[event , ] > threshold.vector))
}
MNLR/BNdownscaleR documentation built on June 12, 2019, 1:58 p.m.