tree <- system.file("extdata",
"tree_of_itol_templates.tree",
package = "itol.toolkit")
hub <- create_hub(tree = tree)
df_values <- data.table::fread(system.file("extdata",
"templates_frequence.txt",
package = "itol.toolkit"))
unit <- create_unit(data = df_values,
key = "Quickstart",
type = "DATASET_HEATMAP",
tree = tree)
hub <- hub + unit
write_raw(hub,tempdir(),"Quickstart")
Run the code above in your browser using DataLab