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 May 2, 2019, 5:55 p.m.