R/fn2.R

Defines functions fn2

fn2 <- function(Bs.gammas,event,W2,P,wk,Time,W2s,id.GK){
  -sum(event*drop(W2%*%Bs.gammas)-P*fastSumID(rep(wk,length(Time))*exp(drop(W2s%*%Bs.gammas)),id.GK))
}

Try the FlexVarJM package in your browser

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

FlexVarJM documentation built on Nov. 21, 2023, 1:06 a.m.