data(windspeed)
daten <- mice::ampute(windspeed)$amp
# \donttest{
bgraph <- boot.graph(data = daten,
method = "pcMI",
args = "solve.confl = TRUE, alpha = 0.05",
R = 5)
# }
Run the code above in your browser using DataLab