powered by
simulateAPFA(g, Nsim = 1000)
library(gRapfa) data(Wheeze) G <- select.IC(Wheeze) simWheeze <- simulateAPFA(G) head(simWheeze)
Run the code above in your browser using DataLab