# NOT RUN {
generatedData=generate.cluster.data(.25,npats=25,clusts=c(12,8),beta=c(-5,5),
outcomeModel=binaryOutcome(0))
## The function is currently defined as
function (mu)
{
outpt = function(x) {
m = length(x)
p = exp(mu + x)/(1 + exp(mu + x))
return(rbinom(m, 1, p))
}
return(outpt)
}
# }
Run the code above in your browser using DataLab