R/initModellist.R

"initModellist" <-
  function(m) {
    m@parnames <- sort(intersect(
      setdiff(slotNames(theta()), c("prel", "drel")),
      slotNames(m)
    ))
    m <- initOneModel(m)
  }

Try the TIMP package in your browser

Any scripts or data that you put into this service are public.

TIMP documentation built on Dec. 28, 2022, 3:06 a.m.