R/addFixedPar.R

Defines functions addFixedPar

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

   return( start )
}
EBukin/maxLik-dev documentation built on May 6, 2019, 11:21 a.m.