Skip to content

Commit

Permalink
Build fix (microbiome#538)
Browse files Browse the repository at this point in the history
  • Loading branch information
TuomasBorman authored and JKC committed Jul 25, 2024
1 parent e71ec61 commit e216d21
Showing 1 changed file with 3 additions and 3 deletions.
6 changes: 3 additions & 3 deletions inst/pages/10_manipulation.qmd
Original file line number Diff line number Diff line change
Expand Up @@ -180,7 +180,7 @@ When total abundances of certain phyla are of relevance, the data is initially a

```{r}
# Agglomerate by phylum
tse_phylum <- tse %>% mergeFeaturesByRank(rank = "Phylum")
tse_phylum <- tse %>% agglomerateByRank(rank = "Phylum")
# Subset by feature and remove NAs
tse_phylum_subset_by_feature <- tse_phylum[
Expand All @@ -200,7 +200,7 @@ Alternatively:

```{r}
# Store features of interest into phyla
phyla <- c("Phylum:Actinobacteria", "Phylum:Chlamydiae")
phyla <- c("Actinobacteria", "Chlamydiae")
# subset by feature
tse_phylum_subset_by_feature <- tse_phylum[phyla, ]
# Show dimensions
Expand Down Expand Up @@ -250,7 +250,7 @@ remove those instances.

```{r}
# Agglomerate data at Genus level
tse_genus <- mergeFeaturesByRank(tse, rank = "Genus")
tse_genus <- aggomerateByRank(tse, rank = "Genus", na.rm = FALSE)
# List bacteria that we want to include
genera <- c("Class:Thermoprotei",
"Genus:Sulfolobus",
Expand Down

0 comments on commit e216d21

Please sign in to comment.