R/parsePriors.R

Defines functions parsePriors

parsePriors = function(priorText){
  # separate based on <-
  rhs = strsplit(x = priorText, split = " <- ")[[1]][2]
  p = eval(parse(text = rhs))
  # separate based on parentheses
  return(p)
}
jonathantemplin/blatent documentation built on Jan. 26, 2024, 11:27 p.m.