R/helperFunctions.R

Defines functions drawE

# function to determine number of settings to draw
drawE <- function(x){
  z <- floor(x)
  if(runif(1) < x-z) z <- z+1
  z <- max(1,z)
  return(z)
}
christinaheinze/CompareCausalNetworks documentation built on Feb. 22, 2020, 12:37 p.m.