powered by
MarginalModel(data = numeric(), k = 2, hypp, mcmc.params)
model <- MarginalModel(data=rnorm(10), k=1)
Run the code above in your browser using DataLab