HarmonizR_Vignette

Introduction

HarmonizR is a framework around the popular batch effect reduction algorithms ComBat and limma, who, on their own, are unable to deal with missing data points within the data. Missing values are not uncommon in biological data, especially in the field of proteomics, for which the tool has originally been developed. HarmonizR uses a matrix dissection approach to circumvent the problematic existence of missing values and still apply established batch effect reduction strategies. Recent updates to the HarmonizR algorithm include but are not limited to increased computational efficiency and more reliable rescue of features (e.g. proteins/genes). For a full overview we would like to direct the reader to our paper published in 2022 in Nature Communications: https://doi.org/10.1038/s41467-022-31007-x

All information regarding the upcoming sections can also be found within our SOP on Github, which is found under the following link: https://www.github.com/HSU-HPC/HarmonizR/tree/HarmonizR-1.1/HarmonizR_SOP.pdf.

Please have a look over there as well.

Installation

The HarmonizR implementation is 100 % written in the programming language R. The easiest way to install it is using the package devtools that can be installed from CRAN via install.packages("devtools") while in the R environment. For further information, please refer to the devtools documentation.

Installation from Github Repository:

The HarmonizR package (https://github.com/HSU-HPC/HarmonizR/tree/HarmonizR-1.1 leads to the package as well as example data) can be installed directly from GitHub via the command devtools::install_github("HSU-HPC/HarmonizR/[email protected]"), while in the R software environment.

Installation from HarmonizR.zip file:

Please make sure to have devtools installed. Download the code via the green Code button (https://github.com/HSU-HPC/HarmonizR/tree/HarmonizR-1.1). Unzip the downloaded .zip file. The HarmonizR package is the folder called HarmonizR, which was within the .zip file. While in the R environment and while in the parent directory of said HarmonizR, enter in the command line: devtools::install("HarmonizR") to install the package. Alternatively, while inside the HarmonizR folder, enter devtools::install().

Once installed, the HarmonizR package can be used via:

library(HarmonizR)

Example Usage

For this example, we create a simple dataframe containing 3 features and 6 samples:

# create a dataframe with 3 rows and 6 columns filled with random numbers
df <- data.frame(matrix(rnorm(n = 3*6), ncol = 6))
# set the column names
colnames(df) <- c("A", "B", "C", "D", "E", "F")
# create a vector of row names
row_names <- c("F1", "F2", "F3")
# set the row names
rownames(df) <- row_names
# this is what it looks like:
df
#>             A         B          C          D         E         F
#> F1 -0.8142490  1.907221  0.2663636 1.71712789 1.0659627  1.258265
#> F2  0.1113195  1.135307 -1.2111954 1.47470643 1.5010481 -1.556452
#> F3 -0.2099552 -1.131286 -0.4046761 0.09998646 0.1600448 -1.523831

Now we create a fitting description, which assigns 2 samples to a batch (3 batches total):

# create a vector of batch numbers
batch <- rep(1:3, each = 2)
# create a dataframe with 6 rows and 3 columns
des <- data.frame(ID = colnames(df), sample = 1:6, batch = batch)
# this is what it looks like:
des
#>   ID sample batch
#> 1  A      1     1
#> 2  B      2     1
#> 3  C      3     2
#> 4  D      4     2
#> 5  E      5     3
#> 6  F      6     3

HarmonizR usage requires a single function call of the harmonizR() function. Here, we pass the created dataframes directly for a sequential run of HarmonizR. Alternatively, a path to the respective input files can be passed.

# use the harmonizR() function; turning off creation of an output .tsv file
result <- harmonizR(df, des, output_file = FALSE, cores = 1)
#> Initializing HarmonizR...
#> Reading the files...
#> Preparing...
#> Splitting the data using ComBat adjustment...
#> Found3batches
#> Adjusting for0covariate(s) or covariate level(s)
#> Standardizing Data across genes
#> Fitting L/S model and finding priors
#> Finding parametric adjustments
#> Adjusting the Data
#> Rebuilding...
#> Termination.

The result mirrors the input data.frame closely, yet the batch-effect has been reduced by either ComBat or limma:

result
#>             A          B          C          D           E          F
#> F1 -0.1608131  1.6739571  0.1681301  1.4927102  1.05175575  1.1959077
#> F2  0.1866855  1.0291896 -1.1672080  1.1328346  1.16053258 -0.8851328
#> F3 -0.2022282 -0.9304372 -0.5644254 -0.0837866 -0.03895048 -1.1222315

Alternatively, S4 data may be used as input. In this case, no description file is needed as long as a batch description is included within the SummarizedExperiment. An example input may look like this:

nrows <- 20
ncols <- 8
counts <- matrix(runif(nrows * ncols, 1, 1e4), nrows)
colData <- data.frame(Batch=c(1,1,1,1,2,2,2,2))
SummExp = SummarizedExperiment::SummarizedExperiment(
    assays=list(counts=counts), 
    colData=colData)

It may be passed instead of data_as_input (following parameter explanation).

Parameters

HarmonizR expects 2 mandatory and a total of nine optional arguments. First, the mandatory ones:

  • data_as_input

  • description_as_input

The first argument data_as_input, is the path to the raw data, the second argument, description_as_input, is the path to the description file. Both input files can be given via their file path and do not have to be read in separately by hand. This method is recommended, as it ensures correct operation if the notes regarding Input above are followed. Alternatively, both parameters can be passed as dataframes or matrices as long as they are fitting the expected input layout.

Next will be four optional arguments found also within the already published HarmonizR:

  • algorithm

  • ComBat_mode

  • plot

  • output_file

The first optional argument is the algorithm of choice. ComBat will be used by default, but using the parameter algorithm, either "ComBat" or "limma" can be chosen for data adjustment. "ComBat" serves as the default. The second optional argument is ComBat_mode. This parameter is only valid once ComBat is chosen for the adjustment.

The ComBat mode is abbreviated for simplicity by using integers:

ComBat_mode     Corresponding ComBat Arguments

1 (default)     par.prior = TRUE, mean.only = FALSE

2               par.prior = TRUE, mean.only = TRUE

3               par.prior = FALSE, mean.only = FALSE

4               par.prior = FALSE, mean.only = TRUE

Please refer to the ComBat documentation for further details.

The third optional parameter is plot. plot can be set to either "samplemeans", "featuremeans" or "CV" and will show a boxplot with a box for each batch depicting the chosen method. This plot will also be saved to a .pdf. This will be either the mean for all samples, the mean for all features or the coefficient of variation. There will be a separate plot for the original, unaltered input dataset and for the ComBat/limma adjusted dataset. By default, this parameter is turned off. Since a log transformation is assumed, this will also be accounted for before plotting. Trying to plot data that has not been log transformed prior may lead to an unplottable result.

The fourth optional parameter is output_file. Setting this parameter will grant the user the ability to choose the name of their output .tsv file. Also, a path can be set. A string is expected as input. This parameter will default to "cured_data", yielding a file called cured_data.tsv.

Further, the five new parameters will be explained one-by-one:

  • sort

sort takes one of three available sorting algorithms as input. Either "sparcity_sort", for a sparcity-based sorting, "seriation_sort", using the seriation package and "jaccard_sort", using a Jaccard-index-based sorting approach. Sorting happens prior to the adjustment and may change the way blocking is executed on the data. Sorting does not yield any benefit when the block parameter is unused.

  • block

block takes an integer as input which dictates, how many batches should be packed together during matrix dissection. This parameter may greatly reduce the amount of sub-dataframes produced and therefore decrease the algorithm’s runtime.

  • verbosity

verbosity takes an integer with the lowest accepted integer being 0. The higher the number, the more feedback will the HarmonizR provide in the command line. A verbosity of 1 is the default and should be sufficient. 0 or "mute" will prevent HarmonizR from showing anything in the command line.

  • cores

cores gives the user the ability to control the number of cores used by their machine during HarmonizR execution. By default, all available cores will be used.

  • ur

ur, short for unique removal, can be set to either TRUE or FALSE to toggle the newly implemented removal of unique combinations for increased feature rescue. By default, this feature is applied, and it is strongly suggested to not turn it off. The parameter is available for result reproducibility.

Session Information

sessionInfo()
#> R version 4.4.2 (2024-10-31)
#> Platform: x86_64-pc-linux-gnu
#> Running under: Ubuntu 24.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.26.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=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: Etc/UTC
#> tzcode source: system (glibc)
#> 
#> attached base packages:
#> [1] stats     graphics  grDevices utils     datasets  methods   base     
#> 
#> other attached packages:
#> [1] HarmonizR_1.5.0 rmarkdown_2.29 
#> 
#> loaded via a namespace (and not attached):
#>  [1] SummarizedExperiment_1.37.0 KEGGREST_1.47.0            
#>  [3] xfun_0.49                   bslib_0.8.0                
#>  [5] Biobase_2.67.0              lattice_0.22-6             
#>  [7] vctrs_0.6.5                 tools_4.4.2                
#>  [9] generics_0.1.3              stats4_4.4.2               
#> [11] parallel_4.4.2              AnnotationDbi_1.69.0       
#> [13] RSQLite_2.3.8               blob_1.2.4                 
#> [15] Matrix_1.7-1                S4Vectors_0.45.2           
#> [17] lifecycle_1.0.4             GenomeInfoDbData_1.2.13    
#> [19] compiler_4.4.2              Biostrings_2.75.1          
#> [21] statmod_1.5.0               codetools_0.2-20           
#> [23] GenomeInfoDb_1.43.2         htmltools_0.5.8.1          
#> [25] sys_3.4.3                   buildtools_1.0.0           
#> [27] sass_0.4.9                  yaml_2.3.10                
#> [29] crayon_1.5.3                jquerylib_0.1.4            
#> [31] BiocParallel_1.41.0         DelayedArray_0.33.2        
#> [33] cachem_1.1.0                limma_3.63.2               
#> [35] iterators_1.0.14            abind_1.4-8                
#> [37] foreach_1.5.2               nlme_3.1-166               
#> [39] sva_3.55.0                  genefilter_1.89.0          
#> [41] locfit_1.5-9.10             digest_0.6.37              
#> [43] maketools_1.3.1             splines_4.4.2              
#> [45] fastmap_1.2.0               grid_4.4.2                 
#> [47] SparseArray_1.7.2           cli_3.6.3                  
#> [49] S4Arrays_1.7.1              XML_3.99-0.17              
#> [51] survival_3.7-0              edgeR_4.5.0                
#> [53] UCSC.utils_1.3.0            bit64_4.5.2                
#> [55] XVector_0.47.0              httr_1.4.7                 
#> [57] matrixStats_1.4.1           bit_4.5.0                  
#> [59] png_0.1-8                   memoise_2.0.1              
#> [61] evaluate_1.0.1              knitr_1.49                 
#> [63] GenomicRanges_1.59.1        IRanges_2.41.1             
#> [65] doParallel_1.0.17           mgcv_1.9-1                 
#> [67] rlang_1.1.4                 Rcpp_1.0.13-1              
#> [69] xtable_1.8-4                DBI_1.2.3                  
#> [71] BiocGenerics_0.53.3         annotate_1.85.0            
#> [73] jsonlite_1.8.9              R6_2.5.1                   
#> [75] plyr_1.8.9                  MatrixGenerics_1.19.0      
#> [77] zlibbioc_1.52.0