# NOT RUN {
# Generating multivariate binary data from a 'random' graph
data.sim <- bdgraph.sim( n = 12, p = 4, size = 4, type = "discrete", cut = 2 )
r_data <- data.sim $ data
r_data
# Transfer the data
transfer( r_data )
# }
Run the code above in your browser using DataLab