def <- defRepeatAdd(
nVars = 4, prefix = "g", formula = "1/3;1/3;1/3",
variance = 0, dist = "categorical"
)
def <- defDataAdd(def, varname = "a", formula = "1;1", dist = "trtAssign")
def <- defRepeatAdd(def, 8, "b", formula = "5 + a", variance = 3, dist = "normal")
def <- defDataAdd(def, "y", formula = "0.10", dist = "binary")
def
Run the code above in your browser using DataLab