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 May 29, 2024, 2:32 a.m.