R/addFixedPar.R

Defines functions addFixedPar

addFixedPar <- function( theta, start, fixed, ...) {
   if( is.null( fixed ) ) {
      start <- theta
   } else {
      start[ !fixed ] <- theta
   }

   return( start )
}

Try the maxLik package in your browser

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

maxLik documentation built on July 27, 2021, 1:07 a.m.