MAPmod<-dags(bnres3)
CONSmod1<-getModels(bnres3,p=0.5)
CONSmod2<-getModels(bnres3,p=0.9)
library(BiDAG)
compareDAGs(MAPmod[[1]],simdags[[1]])
compareDAGs(CONSmod1[[1]],simdags[[1]])
compareDAGs(CONSmod2[[1]],simdags[[1]])
Run the code above in your browser using DataLab