Adds correlation between time-course relative effects

This uses a Wishart prior as default for modelling the correlation

Usage

write.cor(model, fun, class.effect = list())

Arguments

model

A character object of JAGS MBNMA model code

fun

An object of class "timefun" generated (see Details) using any of tloglin(), tpoly(), titp(), temax(), tfpoly(), tspline() or tuser()

class.effect

A list of named strings that determines which time-course parameters to model with a class effect and what that effect should be ("common" or "random"). For example: list(emax="common", et50="random").