Extracting filewrite and moving libraries
This commit is contained in:
parent
5c955a8478
commit
3570b94f49
1 changed files with 4 additions and 4 deletions
|
|
@ -1,8 +1,8 @@
|
|||
if (!file.exists("data/hmc-phyloseq-europe.Rds")) {
|
||||
library(MicroBioMap)
|
||||
library(phyloseq)
|
||||
library(mia)
|
||||
library(MicroBioMap)
|
||||
library(phyloseq)
|
||||
library(mia)
|
||||
|
||||
if (!file.exists("data/hmc-phyloseq-europe.Rds")) {
|
||||
cpd <- getCompendium()
|
||||
cpd_phyloseq <- convertToPhyloseq(x = cpd)
|
||||
sample_data(cpd_phyloseq)$geo_loc_name |> grepl(pattern = "europe")
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue