diff --git a/.pre-commit-config.yaml b/.pre-commit-config.yaml
index ffb61523..76ba6095 100644
--- a/.pre-commit-config.yaml
+++ b/.pre-commit-config.yaml
@@ -2,7 +2,7 @@
# R specific hooks: https://github.com/lorenzwalthert/precommit
repos:
- repo: https://github.com/lorenzwalthert/precommit
- rev: v0.4.1
+ rev: v0.4.3.9026
hooks:
- id: style-files
args: [--style_pkg=styler, --style_fun=tidyverse_style]
@@ -13,7 +13,7 @@ repos:
- id: deps-in-desc
args: [--allow_private_imports]
- repo: https://github.com/pre-commit/pre-commit-hooks
- rev: v4.5.0
+ rev: v6.0.0
hooks:
- id: end-of-file-fixer
exclude: '\.Rd'
diff --git a/R/DOT.R b/R/DOT.R
index 4a0c5e4a..50012c21 100644
--- a/R/DOT.R
+++ b/R/DOT.R
@@ -11,7 +11,6 @@ build_model_dot <- function() {
}
-
#' Deconvolute with DOT
#'
#' Runs DOT deconvolution and returns the DOT weight matrix with column names
diff --git a/R/benchmarking.R b/R/benchmarking.R
index beb6fd2a..b0a950cc 100644
--- a/R/benchmarking.R
+++ b/R/benchmarking.R
@@ -123,9 +123,6 @@ plot_scatter <- function(spe = NULL, value1, value2, spe1 = NULL, spe2 = NULL, l
}
-
-
-
#' Compare Signatures
#'
#' Creates a scatterplot comparing two signature matrices across shared genes.
diff --git a/R/cluster.R b/R/cluster.R
index 12ffcaf6..0c9723e3 100644
--- a/R/cluster.R
+++ b/R/cluster.R
@@ -59,7 +59,6 @@ cluster <- function(spe,
cli::cli_alert_info(paste("Cluster resolution:", toString(clusres)))
-
cli::cli_progress_step("Extracting data", msg_done = "Extracted data for clustering")
# create seurat object
@@ -139,7 +138,6 @@ cluster <- function(spe,
}
-
cli::cli_progress_done()
return(spe)
@@ -199,7 +197,6 @@ get_cluster_features <- function(spe,
clusters <- colData(spe)[, clusterid]
-
# Scores
if (spmethod == "expression") {
if (is.element("cpm", assayNames(spe)) && !is.null(spe@assays@data$cpm)) {
diff --git a/R/deconvolution_algorithms.R b/R/deconvolution_algorithms.R
index a6790ac9..4f00ca5a 100644
--- a/R/deconvolution_algorithms.R
+++ b/R/deconvolution_algorithms.R
@@ -228,8 +228,6 @@ deconvolute <- function(spatial_obj, signature = NULL, single_cell_obj = NULL,
cli::cli_progress_step("testing parameter", msg_done = "parameter OK")
-
-
if (is.null(spatial_obj)) {
stop("Parameter 'spatial_obj' is missing or null, but is required.")
}
diff --git a/R/preprocess.R b/R/preprocess.R
index dbe9ed20..de580430 100644
--- a/R/preprocess.R
+++ b/R/preprocess.R
@@ -110,7 +110,6 @@ preprocess <- function(object, min_umi = 500, max_umi = NULL, assay = "counts",
}
-
cli::cli_progress_step(
msg = "Checking for ENSEMBL Identifiers",
msg_done = "Finished Preprocessing"
diff --git a/R/spatial_correlation.R b/R/spatial_correlation.R
index cd25bc90..c71b79fa 100644
--- a/R/spatial_correlation.R
+++ b/R/spatial_correlation.R
@@ -102,7 +102,6 @@ spatialcorr <- function(spe,
}
-
# Select variables of interests
# If variables is not provided but method is specified, the function selects variables based on those available in the dataset that start with the specified method.
if (is.null(variables) && !is.null(method)) {
diff --git a/R/subset.R b/R/subset.R
index 858a2722..5c6060b4 100644
--- a/R/subset.R
+++ b/R/subset.R
@@ -117,10 +117,6 @@ subsetSCE <- function(sce, cell_type_col = "celltype_major", scenario = "even",
}
-
-
-
-
#' Subset a SpatialExperiment by Spatial Coordinates
#'
#' Filters a `SpatialExperiment` to spots that fall within the provided x/y ranges
diff --git a/R/utils.R b/R/utils.R
index 5fc3db10..7350f530 100644
--- a/R/utils.R
+++ b/R/utils.R
@@ -287,7 +287,6 @@ checkENSEMBL <- function(names) {
}
-
#' Annotate Specific Spots in a SpatialExperiment
#'
#' Adds a new `colData` column that marks selected spots with `value_pos` and all
diff --git a/R/visualization.R b/R/visualization.R
index afaafd91..27e6739a 100644
--- a/R/visualization.R
+++ b/R/visualization.R
@@ -491,7 +491,6 @@ plot_comparison <- function(spe, cell_type_1 = NULL, cell_type_2 = NULL,
}
-
#' Plot Gene Expression
#'
#' Generate a spatial hex plot for a single gene from a `SpatialExperiment`.
@@ -736,8 +735,6 @@ make_baseplot <- function(spe, df, to_plot, palette = "Mako", transform_scale =
}
-
-
# Check if plot is smoothed
if (smooth) {
smooth_suffix <- "smoothed"
diff --git a/docs/LICENSE-text.html b/docs/LICENSE-text.html
index fbe4bc88..d5fa1638 100644
--- a/docs/LICENSE-text.html
+++ b/docs/LICENSE-text.html
@@ -853,8 +853,7 @@
License
the library. If this is what you want to do, use the GNU Lesser General
Public License instead of this License. But first, please read
<https://www.gnu.org/licenses/why-not-lgpl.html>.
-
+
diff --git a/docs/authors.html b/docs/authors.html
index 0b3c1d81..604b995f 100644
--- a/docs/authors.html
+++ b/docs/authors.html
@@ -230,8 +230,7 @@
Citation
year = {2026},
note = {R package version 1.0.0},
url = {https://omnideconv.github.io/spacedeconv},
-}
+}