prevost_m2: Incidence of Interval Cancers and Screen-detected Cancers...

In ellessenne/random: A Random Collection of R Things

Description

Model 2 from Provost et al. (1998), Am J Epidemiol

Usage

prevost_m2(par, J, data)

Arguments

par	Parameter λ of the model
J	Incidence of preclinical disease
data	Dataset

Value

A numeric value representing the negative log-likelihood of the model

Source

https://academic.oup.com/aje/article-lookup/doi/10.1093/oxfordjournals.aje.a009687

Examples

data("crcscreen", package = "tag")
df <- na.omit(crcscreen[crcscreen$ageD == "55-64", ])
J <- crcscreen[crcscreen$ageD == "55-64" & crcscreen$group == "Controls", ]
J <- J$r / J$py
optim(
  par = c(0.5, 0.5),
  f = prevost_m2,
  data = df,
  J = J
)

ellessenne/random documentation built on Nov. 4, 2019, 11:52 a.m.