# NOT RUN {
# library(equSA)
# set.seed(3)
# dagsim <- DAGsim(n = 3000, p = 100, sparsity = 0.02, p.binary = 50)
# data3000 <- dagsim$data
# cont_index <- dagsim$gaussian.index
# binary_index<- dagsim$binary.index
# truegraph <- dagsim$Adjacency.matrix
# }
Run the code above in your browser using DataLab