Conditional distribution of the summative true score given a student's observed interims and their SEs. Missing interims simply drop out, so late enrollers get wider priors rather than wrong ones.
Usage
# S3 method for class 'ty_link'
predict(object, newdata, suffix = "", ...)Examples
sim <- ty_simulate(n_calibration = 300, n_operational = 300, seed = 1)
link <- ty_link(sim)
op <- sim[sim$cohort == "operational", ]
prior <- predict(link, op)
# late enrollers get wider priors
aggregate(prior$sd, list(late = op$late), mean)
#> late x
#> 1 FALSE 0.3490794
#> 2 TRUE 0.4274624