miaSim 1.12.0
miaSim
implements tools for microbiome data simulation based on
varying ecological modeling assumptions. These can be used to simulate
species abundance matrices, including time series. Detailed function
documentation is available at the function reference
The miaSim package supports the R/Bioconductor framework based on the TreeSummarizedExperiment data container. For more information on operating with this data format in microbial ecology, see the online tutorial.
The stable Bioconductor release version can be installed as follows.
if (!requireNamespace("BiocManager", quietly = TRUE))
install.packages("BiocManager")
if (!requireNamespace("miaSim", quietly = TRUE))
BiocManager::install("miaSim")
The experimental Bioconductor devel version can be installed as follows.
if (!requireNamespace("BiocManager", quietly = TRUE))
install.packages("BiocManager")
# The following initializes usage of Bioc devel
BiocManager::install(version='devel')
BiocManager::install("miaSim")
Load the library
library(miaSim)
Some of the models rely on interaction matrices that represents interaction heterogeneity between species. The interaction matrix can be generated with different distributional assumptions.
Generate interactions from normal distribution:
A_normal <- powerlawA(n_species = 4, alpha = 3)
Generate interactions from uniform distribution:
A_uniform <- randomA(n_species = 10,
diagonal = -0.4,
connectance = 0.5,
interactions = runif(n = 10^2, min = -0.8, max = 0.8))
Ricker model is a discrete version of the gLV:
tse_ricker <- simulateRicker(n_species=4, A = A_normal, t_end=100, norm = FALSE)
The number of species specified in the interaction matrix must be the same as the species used in the models.
Hubbell Neutral simulation model characterizes diversity and relative abundance of species in ecological communities assuming migration, births and deaths but no interactions. Losses become replaced by migration or birth.
tse_hubbell <- simulateHubbell(n_species = 8,
M = 10,
carrying_capacity = 1000,
k_events = 50,
migration_p = 0.02,
t_end = 100)
One can also simulate parameters for the Hubbell model.
params_hubbell <- simulateHubbellRates(x0 = c(0,5,10),
migration_p = 0.1, metacommunity_probability = NULL, k_events = 1,
growth_rates = NULL, norm = FALSE, t_end=1000)
The Self-Organised Instability (SOI) model generates time series for communities and accelerates stochastic simulation.
tse_soi <- simulateSOI(n_species = 4, carrying_capacity = 1000,
A = A_normal, k_events=5,
x0 = NULL,t_end = 150, norm = TRUE)
Stochastic logistic model is used to determine dead and alive counts in community.
tse_logistic <- simulateStochasticLogistic(n_species = 5)
The consumer resource model requires the randomE
function. This
returns a matrix containing the production rates and consumption rates
of each species. The resulting matrix is used as a determination of
resource consumption efficiency.
# Consumer-resource model as a TreeSE object
tse_crm <- simulateConsumerResource(n_species = 2,
n_resources = 4,
E = randomE(n_species = 2, n_resources = 4))
You could visualize the simulated dynamics using tools from the miaTime package.
The generalized Lotka-Volterra simulation model generates time-series assuming microbial population dynamics and interaction.
tse_glv <- simulateGLV(n_species = 4,
A = A_normal,
t_start = 0,
t_store = 1000,
stochastic = FALSE,
norm = FALSE)
The simulated data sets are returned as TreeSummarizedExperiment
objects. This provides access to a broad range of tools for microbiome
analysis that support this format (see
microbiome.github.io). More examples on
the object manipulation and analysis can be found at OMA Online
Manual.
For instance, to plot population density we can use the miaViz
package:
library(miaViz)
p1 <- plotAbundanceDensity(tse_hubbell, assay.type = "counts")
p2 <- plotSeries(tse_hubbell, x = "time")
print(p1+p2)
Source code for replicating the published case studies using the miaSim package (Gao et al. 2023) is available in the phyloseq folder (based on the phyloseq data container). Some of the original case studies have now been replicated also with TreeSummarized, see the TreeSummarizedExperiment folder.
sessionInfo()
## R version 4.4.1 (2024-06-14)
## Platform: x86_64-pc-linux-gnu
## Running under: Ubuntu 24.04.1 LTS
##
## Matrix products: default
## BLAS: /home/biocbuild/bbs-3.20-bioc/R/lib/libRblas.so
## LAPACK: /usr/lib/x86_64-linux-gnu/lapack/liblapack.so.3.12.0
##
## locale:
## [1] LC_CTYPE=en_US.UTF-8 LC_NUMERIC=C
## [3] LC_TIME=en_GB LC_COLLATE=C
## [5] LC_MONETARY=en_US.UTF-8 LC_MESSAGES=en_US.UTF-8
## [7] LC_PAPER=en_US.UTF-8 LC_NAME=C
## [9] LC_ADDRESS=C LC_TELEPHONE=C
## [11] LC_MEASUREMENT=en_US.UTF-8 LC_IDENTIFICATION=C
##
## time zone: America/New_York
## tzcode source: system (glibc)
##
## attached base packages:
## [1] stats4 stats graphics grDevices utils datasets methods
## [8] base
##
## other attached packages:
## [1] miaViz_1.14.0 ggraph_2.2.1
## [3] ggplot2_3.5.1 mia_1.14.0
## [5] MultiAssayExperiment_1.32.0 miaSim_1.12.0
## [7] TreeSummarizedExperiment_2.14.0 Biostrings_2.74.0
## [9] XVector_0.46.0 SingleCellExperiment_1.28.0
## [11] SummarizedExperiment_1.36.0 Biobase_2.66.0
## [13] GenomicRanges_1.58.0 GenomeInfoDb_1.42.0
## [15] IRanges_2.40.0 S4Vectors_0.44.0
## [17] BiocGenerics_0.52.0 MatrixGenerics_1.18.0
## [19] matrixStats_1.4.1 BiocStyle_2.34.0
##
## loaded via a namespace (and not attached):
## [1] splines_4.4.1 ggplotify_0.1.2
## [3] tibble_3.2.1 polyclip_1.10-7
## [5] rpart_4.1.23 DirichletMultinomial_1.48.0
## [7] deSolve_1.40 lifecycle_1.0.4
## [9] lattice_0.22-6 MASS_7.3-61
## [11] SnowballC_0.7.1 backports_1.5.0
## [13] magrittr_2.0.3 Hmisc_5.2-0
## [15] sass_0.4.9 rmarkdown_2.28
## [17] jquerylib_0.1.4 yaml_2.3.10
## [19] DBI_1.2.3 minqa_1.2.8
## [21] abind_1.4-8 zlibbioc_1.52.0
## [23] purrr_1.0.2 yulab.utils_0.1.7
## [25] nnet_7.3-19 pracma_2.4.4
## [27] tweenr_2.0.3 sandwich_3.1-1
## [29] GenomeInfoDbData_1.2.13 ggrepel_0.9.6
## [31] tokenizers_0.3.0 irlba_2.3.5.1
## [33] tidytree_0.4.6 vegan_2.6-8
## [35] rbiom_1.0.3 permute_0.9-7
## [37] DelayedMatrixStats_1.28.0 codetools_0.2-20
## [39] DelayedArray_0.32.0 scuttle_1.16.0
## [41] ggforce_0.4.2 tidyselect_1.2.1
## [43] aplot_0.2.3 UCSC.utils_1.2.0
## [45] farver_2.1.2 lme4_1.1-35.5
## [47] ScaledMatrix_1.14.0 viridis_0.6.5
## [49] base64enc_0.1-3 jsonlite_1.8.9
## [51] BiocNeighbors_2.0.0 decontam_1.26.0
## [53] tidygraph_1.3.1 Formula_1.2-5
## [55] scater_1.34.0 tools_4.4.1
## [57] ggnewscale_0.5.0 treeio_1.30.0
## [59] Rcpp_1.0.13 glue_1.8.0
## [61] gridExtra_2.3 SparseArray_1.6.0
## [63] xfun_0.48 mgcv_1.9-1
## [65] dplyr_1.1.4 withr_3.0.2
## [67] BiocManager_1.30.25 fastmap_1.2.0
## [69] boot_1.3-31 bluster_1.16.0
## [71] fansi_1.0.6 digest_0.6.37
## [73] rsvd_1.0.5 R6_2.5.1
## [75] gridGraphics_0.5-1 colorspace_2.1-1
## [77] lpSolve_5.6.21 poweRlaw_0.80.0
## [79] utf8_1.2.4 tidyr_1.3.1
## [81] generics_0.1.3 data.table_1.16.2
## [83] DECIPHER_3.2.0 graphlayouts_1.2.0
## [85] httr_1.4.7 htmlwidgets_1.6.4
## [87] S4Arrays_1.6.0 pkgconfig_2.0.3
## [89] gtable_0.3.6 janeaustenr_1.0.0
## [91] htmltools_0.5.8.1 bookdown_0.41
## [93] scales_1.3.0 ggfun_0.1.7
## [95] knitr_1.48 rstudioapi_0.17.1
## [97] reshape2_1.4.4 checkmate_2.3.2
## [99] nlme_3.1-166 nloptr_2.1.1
## [101] cachem_1.1.0 zoo_1.8-12
## [103] stringr_1.5.1 parallel_4.4.1
## [105] vipor_0.4.7 foreign_0.8-87
## [107] pillar_1.9.0 grid_4.4.1
## [109] vctrs_0.6.5 slam_0.1-54
## [111] BiocSingular_1.22.0 beachmat_2.22.0
## [113] cluster_2.1.6 beeswarm_0.4.0
## [115] htmlTable_2.4.3 evaluate_1.0.1
## [117] magick_2.8.5 tinytex_0.53
## [119] mvtnorm_1.3-1 cli_3.6.3
## [121] compiler_4.4.1 rlang_1.1.4
## [123] crayon_1.5.3 tidytext_0.4.2
## [125] labeling_0.4.3 mediation_4.5.0
## [127] plyr_1.8.9 fs_1.6.4
## [129] ggbeeswarm_0.7.2 stringi_1.8.4
## [131] viridisLite_0.4.2 BiocParallel_1.40.0
## [133] munsell_0.5.1 lazyeval_0.2.2
## [135] Matrix_1.7-1 patchwork_1.3.0
## [137] sparseMatrixStats_1.18.0 highr_0.11
## [139] igraph_2.1.1 memoise_2.0.1
## [141] RcppParallel_5.1.9 bslib_0.8.0
## [143] ggtree_3.14.0 ape_5.8