# generate the data from multivariate normal distribution
data.sim <- bdgraph.sim(n = 100, p = 8, graph = "circle", vis = T)
output <- bdgraph(data.sim, meanzero = T, iter = 2000, save.all = TRUE)
plotcoda(output)
Run the code above in your browser using DataLab