Export the workflow plot as HTML
export_html(g, file, ...)
| g | Plot rendered by |
|---|---|
| file | File to save HTML into. |
| ... | Additional parameters for |
HTML file path
file_html <- tempfile(fileext = ".html") flow <- system.file("cwl/sbg/workflow/gatk4-wgs.json", package = "tidycwl") %>% read_cwl_json() if (rmarkdown::pandoc_available("1.12.3")) { get_graph( flow %>% parse_inputs(), flow %>% parse_outputs(), flow %>% parse_steps() ) %>% visualize_graph() %>% export_html(file_html) }