R/myffitYP412.R

Defines functions myffitYP412

Documented in myffitYP412

myffitYP412 <- function(x2, myY, myd, myZ, beta1) {
         tempT <- fitYP41(Y=myY, d=myd, Z=myZ, beta1=beta1, beta2=x2)
         return( - tempT$EmpLik)
}
 

Try the ELYP package in your browser

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

ELYP documentation built on May 2, 2019, 5:17 a.m.