R/dpenaltyfunction.R

dpenaltyfunction <- function(psv, beta){
  psv <- I(psv)
  beta <- I(beta)
  dpenalty <- 1
  return(dpenalty)}

Try the penMSM package in your browser

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

penMSM documentation built on May 2, 2019, 11:06 a.m.