# NOT RUN {
library(JointNets)
simulateresult = simulation(p = 20, n = c(100,100))
result = simule(simulateresult$simulatedsamples, 0.2, 0.5, covType = "cov", FALSE)
BIC(simulateresult$simulatedsamples,result)
# }
Run the code above in your browser using DataLab