library(graph)
plot(as(matrix(c(0, 0, 0, 0,
                 0, 0, 1, 0,
                 0, 0, 0, 0,
                 1, 1, 0, 0),
               4,
               dimnames = list(c('A', 'Q', 'C', 'Y'),
                               c('A', 'Q', 'C', 'Y'))), 'graphNEL'))
plot(as(matrix(c(0, 0, 0, 0,
                 0, 0, 0, 0,
                 0, 0, 0, 0,
                 1, 1, 1, 0),
               4,
               dimnames = list(c('A', 'B', 'C', 'Y'),
                               c('A', 'B', 'C', 'Y'))), 'graphNEL'))
plot(as(matrix(c(0, 0, 0,
                 0, 0, 0,
                 1, 0, 0),
               3,
               dimnames = list(c('B', 'C', 'ΔY_A'),
                               c('B', 'C', 'ΔY_A'))), 'graphNEL'))


dhessing/ipcalg documentation built on Dec. 19, 2021, 11:07 p.m.