# NOT RUN {
# We will generate 2 different data sets from truth1 (V1-->T1-->T2-->T3)
# with signal = 1, N = 100 and 6 different node orderings. Therefore, we will
# get 2 by 30 output matrix, where the first and second rows are for data sets 1 and 2 respectively.
# Columns 1:6, 7:12, 13:18, 19:24 and 25:30 are for MRPC, pc, pc.stable, mmpc and
# mmhc respectively with node order 1, 2, ..., 6.
library(MRPC) # MRPC
library(pcalg) # pc
library(bnlearn) # pc.stable, mmpc, and mmhc
# Run
Output <- CompareMethodsNodeOrdering(N = 100,
'truth1',
signal = 1,
n_data = 2,
n_nodeordering = 6)
# }
Run the code above in your browser using DataLab