Closed taylorreiter closed 2 years ago
remotes::install_github("Arcadia-Science/sourmashconsumr") library(sourmashconsumr) library(dplyr) library(ggplot2) library(purrr) sigs <- Sys.glob("*100k.sig") %>% map_dfr(read_signature) %>% filter(ksize == 21) rarefaction_df <- from_signatures_to_rarefaction_df(sigs) plot_signatures_rarefaction(rarefaction_df) # + # theme_minimal() + # geom_point(aes(color = name))
uncomment lines to get colored curves and no grey background.
closed by #46
uncomment lines to get colored curves and no grey background.