Since read counts are summed across cells in a pseudobulk approach, modeling continuous cell-level covariates also requires a collapsing step. Here we summarize the values of a variable from a set of cells using the mean, and store the value for each cell type. Including these variables in a regression formula uses the summarized values from the corresponding cell type.
We demonstrate this feature on a lightly modified analysis of PBMCs from 8 individuals stimulated with interferon-β (Kang, et al, 2018, Nature Biotech).
Here is the code from the main vignette:
library(dreamlet)
library(muscat)
library(ExperimentHub)
library(scater)
# Download data, specifying EH2259 for the Kang, et al study
eh <- ExperimentHub()# only keep singlet cells with sufficient reads
sce <- sce[rowSums(counts(sce) > 0) > 0, ]
sce <- sce[, colData(sce)$multiplets == "singlet"]
# compute QC metrics
qc <- perCellQCMetrics(sce)
# remove cells with few or many detected genes
ol <- isOutlier(metric = qc$detected, nmads = 2, log = TRUE)
sce <- sce[, !ol]
# set variable indicating stimulated (stim) or control (ctrl)
sce$StimStatus <- sce$stimIn many datasets, continuous cell-level variables could be mapped reads, gene count, mitochondrial rate, etc. There are no continuous cell-level variables in this dataset, so we can simulate two from a normal distribution:
Now compute the pseudobulk using standard code:
sce$id <- paste0(sce$StimStatus, sce$ind)
# Create pseudobulk
pb <- aggregateToPseudoBulk(sce,
assay = "counts",
cluster_id = "cell",
sample_id = "id",
verbose = FALSE
)The means per variable, cell type, and sample are stored in the
pseudobulk SingleCellExperiment object:
## # A tibble: 128 × 5
## # Groups: cell [8]
## cell id cluster value1 value2
## <fct> <fct> <dbl> <dbl> <dbl>
## 1 B cells ctrl101 3.96 -0.0135 0.0437
## 2 B cells ctrl1015 4.00 0.0171 0.00111
## 3 B cells ctrl1016 4 -0.0190 -0.0365
## 4 B cells ctrl1039 4.04 0.0725 -0.118
## 5 B cells ctrl107 4 -0.0170 0.0315
## 6 B cells ctrl1244 4 0.00922 0.0183
## 7 B cells ctrl1256 4.01 -0.0234 -0.120
## 8 B cells ctrl1488 4.02 -0.0390 0.113
## 9 B cells stim101 4.09 0.0450 0.0573
## 10 B cells stim1015 4.06 0.0239 0.111
## # ℹ 118 more rows
Including these variables in a regression formula uses the summarized
values from the corresponding cell type. This happens behind the scenes,
so the user doesn’t need to distinguish bewteen sample-level variables
stored in colData(pb) and cell-level variables stored in
metadata(pb)$aggr_means.
Variance partition and hypothesis testing proceeds as ususal:
form <- ~ StimStatus + value1 + value2
# Normalize and apply voom/voomWithDreamWeights
res.proc <- processAssays(pb, form, min.count = 5)
# run variance partitioning analysis
vp.lst <- fitVarPart(res.proc, form)
# Summarize variance fractions genome-wide for each cell type
plotVarPart(vp.lst, label.angle = 60)# Differential expression analysis within each assay
res.dl <- dreamlet(res.proc, form)
# dreamlet results include coefficients for value1 and value2
res.dl## class: dreamletResult
## assays(8): B cells CD14+ Monocytes ... Megakaryocytes NK cells
## Genes:
## min: 164
## max: 5262
## details(7): assay n_retain ... n_errors error_initial
## coefNames(4): (Intercept) StimStatusstim value1 value2
A variable in colData(sce) is handled according to if
the variable is
metadata(pb)$aggr_meanscolData(pb)## R version 4.6.1 (2026-06-24)
## Platform: x86_64-pc-linux-gnu
## Running under: Ubuntu 26.04.1 LTS
##
## Matrix products: default
## BLAS: /usr/lib/x86_64-linux-gnu/openblas-pthread/libblas.so.3
## LAPACK: /usr/lib/x86_64-linux-gnu/openblas-pthread/libopenblasp-r0.3.32.so; LAPACK version 3.12.0
##
## locale:
## [1] LC_CTYPE=en_US.UTF-8 LC_NUMERIC=C
## [3] LC_TIME=en_US.UTF-8 LC_COLLATE=en_US.UTF-8
## [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: Etc/UTC
## tzcode source: system (glibc)
##
## attached base packages:
## [1] stats4 stats graphics grDevices utils datasets methods
## [8] base
##
## other attached packages:
## [1] muscData_1.27.1 scater_1.41.2
## [3] scuttle_1.23.2 ExperimentHub_3.3.2
## [5] AnnotationHub_4.3.2 BiocFileCache_3.3.0
## [7] dbplyr_2.6.0 muscat_1.27.4
## [9] dreamlet_1.11.0 SingleCellExperiment_1.35.2
## [11] SummarizedExperiment_1.43.0 Biobase_2.73.2
## [13] GenomicRanges_1.65.4 Seqinfo_1.3.2
## [15] IRanges_2.47.5 S4Vectors_0.51.10
## [17] BiocGenerics_0.59.12 generics_0.1.4
## [19] MatrixGenerics_1.25.0 matrixStats_1.5.0
## [21] variancePartition_1.43.1 BiocParallel_1.47.0
## [23] limma_3.99.0 ggplot2_4.0.3
## [25] BiocStyle_2.41.0
##
## loaded via a namespace (and not attached):
## [1] bitops_1.1-0 httr_1.4.9
## [3] RColorBrewer_1.1-3 doParallel_1.0.17
## [5] Rgraphviz_2.57.2 numDeriv_2016.8-1.1
## [7] tools_4.6.1 backports_1.5.1
## [9] utf8_1.2.6 R6_2.6.1
## [11] metafor_5.2-1 mgcv_1.9-4
## [13] GetoptLong_1.1.1 withr_3.0.3
## [15] prettyunits_1.2.0 gridExtra_2.3.1
## [17] cli_3.6.6 sandwich_3.1-3
## [19] labeling_0.4.3 sass_0.4.10
## [21] KEGGgraph_1.73.0 SQUAREM_2026.1
## [23] mvtnorm_1.4-2 S7_0.2.2
## [25] blme_1.0-7 mixsqp_0.3-54
## [27] zenith_1.15.0 invgamma_1.2
## [29] RSQLite_3.53.3 shape_1.4.6.1
## [31] gtools_3.9.5 dplyr_1.2.1
## [33] Matrix_1.7-6 scrapper_1.7.9
## [35] metadat_1.6-0 ggbeeswarm_0.7.3
## [37] abind_1.4-8 lifecycle_1.0.5
## [39] yaml_2.3.12 edgeR_4.99.6
## [41] mathjaxr_2.0-0 gplots_3.3.0
## [43] SparseArray_1.13.3 grid_4.6.1
## [45] blob_1.3.0 crayon_1.5.3
## [47] lattice_0.23-1 beachmat_2.29.3
## [49] msigdbr_26.1.1 annotate_1.91.0
## [51] KEGGREST_1.53.6 sys_3.4.3
## [53] maketools_1.3.2 pillar_1.11.1
## [55] knitr_1.52 ComplexHeatmap_2.29.0
## [57] rjson_0.2.23 boot_1.3-32
## [59] corpcor_1.6.10 codetools_0.2-20
## [61] glue_1.8.1 data.table_1.18.6.1
## [63] vctrs_0.7.3 png_0.1-9
## [65] Rdpack_2.6.6 gtable_0.3.6
## [67] assertthat_0.2.1 cachem_1.1.0
## [69] zigg_0.0.2 xfun_0.61
## [71] rbibutils_2.4.1 S4Arrays_1.13.1
## [73] Rfast_2.1.5.2 reformulas_0.4.4
## [75] iterators_1.0.14 statmod_1.5.2
## [77] nlme_3.1-171 pbkrtest_0.5.5
## [79] bit64_4.8.6 progress_1.2.3
## [81] EnvStats_3.1.0 filelock_1.0.3
## [83] bslib_0.12.0 TMB_1.9.25
## [85] irlba_2.3.7 vipor_0.4.7
## [87] KernSmooth_2.23-27 colorspace_2.1-3
## [89] rmeta_3.0 DBI_1.3.0
## [91] tidyselect_1.2.1 bit_4.6.0
## [93] compiler_4.6.1 curl_8.0.0
## [95] httr2_1.3.0 graph_1.91.0
## [97] BiocNeighbors_2.7.3 DelayedArray_0.39.7
## [99] scales_1.4.0 caTools_1.18.4
## [101] remaCor_0.0.20 rappdirs_0.3.4
## [103] stringr_1.6.0 digest_0.6.39
## [105] minqa_1.2.8 rmarkdown_2.32
## [107] aod_1.3.3 XVector_0.53.0
## [109] RhpcBLASctl_0.23-42 htmltools_0.5.9
## [111] pkgconfig_2.0.3 lme4_2.0-6
## [113] sparseMatrixStats_1.25.0 mashr_0.2.79
## [115] fastmap_1.2.0 rlang_1.3.0
## [117] GlobalOptions_0.1.4 DelayedMatrixStats_1.35.0
## [119] farver_2.1.2 jquerylib_0.1.4
## [121] zoo_1.9-1 jsonlite_2.0.0
## [123] BiocSingular_1.29.1 RCurl_1.98-1.20
## [125] magrittr_2.0.5 Rcpp_1.1.2
## [127] viridis_0.6.5 EnrichmentBrowser_2.43.0
## [129] stringi_1.8.9 MASS_7.3-66
## [131] plyr_1.8.9 parallel_4.6.1
## [133] ggrepel_0.9.8 Biostrings_2.81.9
## [135] splines_4.6.1 hms_1.1.4
## [137] circlize_0.4.18 locfit_1.5-9.12
## [139] buildtools_1.0.0 reshape2_1.4.5
## [141] ScaledMatrix_1.21.0 BiocVersion_3.24.0
## [143] XML_3.99-0.25 evaluate_1.0.5
## [145] RcppParallel_6.2.1 BiocManager_1.30.27
## [147] nloptr_2.2.1 foreach_1.5.2
## [149] tidyr_1.3.2 purrr_1.2.2
## [151] clue_0.3-68 scattermore_1.2
## [153] ashr_2.2-63 BiocBaseUtils_1.15.1
## [155] rsvd_1.0.5 broom_1.0.13
## [157] xtable_1.8-8 fANCOVA_0.6-1
## [159] viridisLite_0.4.3 truncnorm_1.0-9
## [161] tibble_3.3.1 lmerTest_3.2-1
## [163] glmmTMB_1.1.14 memoise_2.0.1
## [165] beeswarm_0.4.0 AnnotationDbi_1.75.2
## [167] cluster_2.1.8.3 GSEABase_1.75.0