polarolouis/human-microbiome-compendium
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Extracting filewrite and moving libraries

Browse source
This commit is contained in:
Louis 2025-10-17 16:48:23 +02:00
parent 5c955a8478
commit 3570b94f49
1 changed files with 4 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
load-europe.R
View file

@ -1,8 +1,8 @@
if (!file.exists("data/hmc-phyloseq-europe.Rds")) { library(MicroBioMap)
library(MicroBioMap) library(phyloseq)
library(phyloseq) library(mia)
library(mia)
if (!file.exists("data/hmc-phyloseq-europe.Rds")) {
cpd <- getCompendium() cpd <- getCompendium()
cpd_phyloseq <- convertToPhyloseq(x = cpd) cpd_phyloseq <- convertToPhyloseq(x = cpd)
sample_data(cpd_phyloseq)$geo_loc_name |> grepl(pattern = "europe") sample_data(cpd_phyloseq)$geo_loc_name |> grepl(pattern = "europe")