# \donttest{
library(scPOEM)
library(monocle)
dirpath <- "./example_data"
# Download single mode example data
data(example_data_single)
# Construct PPN net.
pp_net <- PPN(example_data_single$X,
example_data_single$peak_data,
example_data_single$cell_data,
example_data_single$genome,
file.path(dirpath, "single"),
save_file=FALSE)
# }
Run the code above in your browser using DataLab