lefser icon indicating copy to clipboard operation
lefser copied to clipboard

Add .selectPalette function.

Open sdgamboa opened this issue 1 year ago • 0 comments

  • Add a helper function in utils named .selectPalette that could be used to try a couple of palette options.
suppressMessages(library(lefser))
data(zeller14)
zeller14 <- zeller14[, zeller14$study_condition != "adenoma"]
tn <- get_terminal_nodes(rownames(zeller14))
zeller14tn <- zeller14[tn,]
zeller14tn_ra <- relativeAb(zeller14tn)

res <- lefser(
    zeller14tn_ra, groupCol = "study_condition", blockCol = "age_category"
)
#> The outcome variable is specified as 'study_condition' and the reference category is 'control'.
#>  See `?factor` or `?relevel` to change the reference category.
lefserPlot(res)
#> Using palette: colorblind

lefserPlot(res, colors = "l")
#> Using palette: lefse

lefserPlot(res, colors = "g")
#> Using palette: greyscale

lefserPlot(res, colors = c("purple", "pink"))

sessioninfo::session_info()
#> ─ Session info ───────────────────────────────────────────────────────────────
#>  setting  value
#>  version  R version 4.4.0 (2024-04-24)
#>  os       Pop!_OS 22.04 LTS
#>  system   x86_64, linux-gnu
#>  ui       X11
#>  language (EN)
#>  collate  en_US.UTF-8
#>  ctype    en_US.UTF-8
#>  tz       America/New_York
#>  date     2024-09-10
#>  pandoc   3.1.12.3 @ /usr/bin/ (via rmarkdown)
#> 
#> ─ Packages ───────────────────────────────────────────────────────────────────
#>  package              * version date (UTC) lib source
#>  abind                  1.4-5   2016-07-21 [1] RSPM (R 4.4.0)
#>  Biobase              * 2.65.1  2024-08-28 [1] Bioconductor 3.20 (R 4.4.0)
#>  BiocGenerics         * 0.51.1  2024-09-03 [1] Bioconductor 3.20 (R 4.4.0)
#>  brio                   1.1.5   2024-04-24 [1] RSPM (R 4.4.0)
#>  cli                    3.6.3   2024-06-21 [1] RSPM (R 4.4.0)
#>  codetools              0.2-20  2024-03-31 [2] CRAN (R 4.4.0)
#>  coin                   1.4-3   2023-09-27 [1] RSPM (R 4.4.0)
#>  colorspace             2.1-1   2024-07-26 [1] RSPM (R 4.4.0)
#>  crayon                 1.5.3   2024-06-20 [1] RSPM (R 4.4.0)
#>  DelayedArray           0.31.11 2024-08-04 [1] Bioconductor 3.20 (R 4.4.0)
#>  digest                 0.6.37  2024-08-19 [1] RSPM (R 4.4.0)
#>  dplyr                  1.1.4   2023-11-17 [1] RSPM (R 4.4.0)
#>  evaluate               0.24.0  2024-06-10 [1] RSPM (R 4.4.0)
#>  fansi                  1.0.6   2023-12-08 [1] RSPM (R 4.4.0)
#>  farver                 2.1.2   2024-05-13 [1] RSPM (R 4.4.0)
#>  fastmap                1.2.0   2024-05-15 [1] RSPM (R 4.4.0)
#>  fs                     1.6.4   2024-04-25 [1] RSPM (R 4.4.0)
#>  generics               0.1.3   2022-07-05 [1] RSPM (R 4.4.0)
#>  GenomeInfoDb         * 1.41.1  2024-05-24 [1] Bioconductor 3.20 (R 4.4.0)
#>  GenomeInfoDbData       1.2.12  2024-05-08 [1] Bioconductor
#>  GenomicRanges        * 1.57.1  2024-06-12 [1] Bioconductor 3.20 (R 4.4.0)
#>  ggplot2                3.5.1   2024-04-23 [1] RSPM (R 4.4.0)
#>  glue                   1.7.0   2024-01-09 [1] RSPM (R 4.4.0)
#>  gtable                 0.3.5   2024-04-22 [1] RSPM (R 4.4.0)
#>  htmltools              0.5.8.1 2024-04-04 [1] RSPM (R 4.4.0)
#>  httr                   1.4.7   2023-08-15 [1] RSPM (R 4.4.0)
#>  IRanges              * 2.39.2  2024-07-17 [1] Bioconductor 3.20 (R 4.4.0)
#>  jsonlite               1.8.8   2023-12-04 [1] RSPM (R 4.4.0)
#>  knitr                  1.48    2024-07-07 [1] RSPM (R 4.4.0)
#>  labeling               0.4.3   2023-08-29 [1] RSPM (R 4.4.0)
#>  lattice                0.22-6  2024-03-20 [2] CRAN (R 4.4.0)
#>  lefser               * 1.15.8  2024-09-10 [1] Bioconductor
#>  libcoin                1.0-10  2023-09-27 [1] RSPM (R 4.4.0)
#>  lifecycle              1.0.4   2023-11-07 [1] RSPM (R 4.4.0)
#>  magrittr               2.0.3   2022-03-30 [1] RSPM (R 4.4.0)
#>  MASS                   7.3-61  2024-06-13 [2] RSPM (R 4.4.0)
#>  Matrix                 1.7-0   2024-03-22 [2] CRAN (R 4.4.0)
#>  MatrixGenerics       * 1.17.0  2024-05-01 [1] Bioconductor 3.20 (R 4.4.0)
#>  matrixStats          * 1.3.0   2024-04-11 [1] RSPM (R 4.4.0)
#>  modeltools             0.2-23  2020-03-05 [1] RSPM (R 4.4.0)
#>  multcomp               1.4-26  2024-07-18 [1] RSPM (R 4.4.0)
#>  munsell                0.5.1   2024-04-01 [1] RSPM (R 4.4.0)
#>  mvtnorm                1.3-1   2024-09-03 [1] RSPM (R 4.4.0)
#>  pillar                 1.9.0   2023-03-22 [1] RSPM (R 4.4.0)
#>  pkgconfig              2.0.3   2019-09-22 [1] RSPM (R 4.4.0)
#>  R6                     2.5.1   2021-08-19 [1] RSPM (R 4.4.0)
#>  reprex                 2.1.1   2024-07-06 [1] CRAN (R 4.4.0)
#>  rlang                  1.1.4   2024-06-04 [1] RSPM (R 4.4.0)
#>  rmarkdown              2.28    2024-08-17 [1] RSPM (R 4.4.0)
#>  rstudioapi             0.16.0  2024-03-24 [1] RSPM (R 4.4.0)
#>  S4Arrays               1.5.7   2024-08-06 [1] Bioconductor 3.20 (R 4.4.0)
#>  S4Vectors            * 0.43.2  2024-07-17 [1] Bioconductor 3.20 (R 4.4.0)
#>  sandwich               3.1-0   2023-12-11 [1] RSPM (R 4.4.0)
#>  scales                 1.3.0   2023-11-28 [1] RSPM (R 4.4.0)
#>  sessioninfo            1.2.2   2021-12-06 [1] RSPM (R 4.4.0)
#>  SparseArray            1.5.31  2024-08-04 [1] Bioconductor 3.20 (R 4.4.0)
#>  SummarizedExperiment * 1.35.1  2024-06-28 [1] Bioconductor 3.20 (R 4.4.0)
#>  survival               3.7-0   2024-06-05 [2] RSPM (R 4.4.0)
#>  testthat               3.2.1.1 2024-04-14 [1] RSPM (R 4.4.0)
#>  TH.data                1.1-2   2023-04-17 [1] RSPM (R 4.4.0)
#>  tibble                 3.2.1   2023-03-20 [1] RSPM (R 4.4.0)
#>  tidyselect             1.2.1   2024-03-11 [1] RSPM (R 4.4.0)
#>  UCSC.utils             1.1.0   2024-05-01 [1] Bioconductor 3.20 (R 4.4.0)
#>  utf8                   1.2.4   2023-10-22 [1] RSPM (R 4.4.0)
#>  vctrs                  0.6.5   2023-12-01 [1] RSPM (R 4.4.0)
#>  withr                  3.0.1   2024-07-31 [1] RSPM (R 4.4.0)
#>  xfun                   0.47    2024-08-17 [1] RSPM (R 4.4.0)
#>  XVector                0.45.0  2024-05-01 [1] Bioconductor 3.20 (R 4.4.0)
#>  yaml                   2.3.10  2024-07-26 [1] RSPM (R 4.4.0)
#>  zlibbioc               1.51.1  2024-06-05 [1] Bioconductor 3.20 (R 4.4.0)
#>  zoo                    1.8-12  2023-04-13 [1] RSPM (R 4.4.0)
#> 
#>  [1] /home/user/R/x86_64-pc-linux-gnu-library/4.4
#>  [2] /home/user/apps/R-4.4.0/library
#> 
#> ──────────────────────────────────────────────────────────────────────────────

Created on 2024-09-10 with reprex v2.1.1

sdgamboa avatar Sep 10 '24 21:09 sdgamboa