WT_Covariate <-
Covariate(Name = "WT",
Type = "Continuous",
StParmName = "V",
State = "Present",
Direction = "Forward",
Center = 70,
Thetas = Theta("dVdWT", 1))
Race_Covariate <-
Covariate(
Name = "Race",
Type = "Categorical",
StParmName = "V2",
State = "Searched",
Direction = "Backward",
Center = "None",
Categories = c(1,2,3))
Run the code above in your browser using DataLab