Skip to content

Commit 20e32c3

Browse files
committed
Reapply "Merge pull request #75 from DiseaseTranscriptomicsLab/main"
This reverts commit 2447feb.
1 parent 2447feb commit 20e32c3

20 files changed

Lines changed: 622 additions & 443 deletions

DESCRIPTION

Lines changed: 4 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1,6 +1,6 @@
11
Package: markeR
22
Title: An R Toolkit for Evaluating Gene Signatures as Phenotypic Markers
3-
Version: 0.99.3
3+
Version: 0.99.5
44
Authors@R:
55
c(
66
person("Rita", "Martins-Silva",
@@ -58,7 +58,9 @@ Suggests:
5858
rmarkdown,
5959
roxygen2,
6060
mockery,
61-
covr
61+
covr,
62+
magick,
63+
BiocStyle
6264
Config/testthat/edition: 3
6365
Depends:
6466
R (>= 4.5.0)

NAMESPACE

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -63,6 +63,7 @@ importFrom(pROC,roc)
6363
importFrom(reshape2,melt)
6464
importFrom(rstatix,t_test)
6565
importFrom(scales,hue_pal)
66+
importFrom(scales,rescale)
6667
importFrom(scales,squish)
6768
importFrom(stats,TukeyHSD)
6869
importFrom(stats,anova)

NEWS.md

Lines changed: 17 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -1,3 +1,20 @@
1+
# markeR 0.99.5 (17 Sep, 2025)
2+
3+
- Minor fix in `.onAttach()` to avoid errors when checking `ggplot2` version and ensure the startup warning works correctly.
4+
5+
# markeR 0.99.4 (17 Sep, 2025)
6+
7+
## General
8+
- Addressed feedback from the Bioconductor review process with updates to documentation and vignette style.
9+
10+
## Documentation and vignette
11+
- Updated vignette style to **Bioconductor’s BiocStyle** with automatic table of contents.
12+
- Improved vignette content with small corrections.
13+
- Revised dataset documentation by adding explicit `usage: data(object)` entries.
14+
15+
## Functions
16+
- Updated `geneset_similarity()` color handling: replaced the single `color_values` parameter with three new parameters — `color`, `neutral_color`, and `cold_color`, for more interpretable visualization.
17+
118
# markeR 0.99.3 (21 Aug, 2025)
219

320
## Package size and structure

R/FPR_Simulation.R

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -108,7 +108,7 @@ utils::globalVariables(c( "cohen", "method", "contrast" ))
108108
#' @export
109109
#'
110110
FPR_Simulation <- function(data, metadata, original_signatures, Variable,
111-
gene_list = NULL, number_of_sims=10, title=NULL,
111+
gene_list = NULL, number_of_sims=100, title=NULL,
112112
widthTitle = 30, titlesize = 12, pointSize = 2,
113113
labsize = 10,mode = c( "none","simple","medium","extensive"),
114114
ColorValues=NULL, ncol=NULL, nrow=NULL) {

R/PlotScores.R

Lines changed: 16 additions & 16 deletions
Original file line numberDiff line numberDiff line change
@@ -786,16 +786,16 @@ PlotScores_Categorical <- function(data, metadata, gene_sets,
786786
if (!is.null(title)) title <- wrap_title(title, width = widthTitle)
787787

788788
# Create label for y axis based on method.
789-
if (method == "ssGSEA") {
790-
ylab <- "ssGSEA Enrichment Score"
791-
} else if (method == "logmedian") {
792-
ylab <- "Normalised Signature Score"
793-
} else if (method == "ranking") {
794-
ylab <- "Signature Genes' Ranking"
795-
}
789+
# if (method == "ssGSEA") {
790+
# ylab <- "ssGSEA Enrichment Score"
791+
# } else if (method == "logmedian") {
792+
# ylab <- "Normalised Signature Score"
793+
# } else if (method == "ranking") {
794+
# ylab <- "Signature Genes' Ranking"
795+
# }
796796

797797
combined_plot <- ggpubr::annotate_figure(combined_plot,
798-
left = grid::textGrob(ylab,
798+
left = grid::textGrob(paste0("Gene Set's Score (", method, ")"),
799799
rot = 90, vjust = 1,
800800
gp = grid::gpar(cex = 1.3,
801801
fontsize = labsize)),
@@ -1093,16 +1093,16 @@ PlotScores_Numeric <- function(data,
10931093
if (!is.null(title)) title <- wrap_title(title, width = widthTitle)
10941094

10951095
# Create label for y axis based on method.
1096-
if (method == "ssGSEA") {
1097-
ylab <- "ssGSEA Enrichment Score"
1098-
} else if (method == "logmedian") {
1099-
ylab <- "Normalised Signature Score"
1100-
} else if (method == "ranking") {
1101-
ylab <- "Signature Genes' Ranking"
1102-
}
1096+
# if (method == "ssGSEA") {
1097+
# ylab <- "ssGSEA Enrichment Score"
1098+
# } else if (method == "logmedian") {
1099+
# ylab <- "Normalised Signature Score"
1100+
# } else if (method == "ranking") {
1101+
# ylab <- "Signature Genes' Ranking"
1102+
# }
11031103

11041104
combined_plot <- ggpubr::annotate_figure(combined_plot,
1105-
left = grid::textGrob(ylab,
1105+
left = grid::textGrob(paste0("Gene Set's Score (", method, ")"),
11061106
rot = 90,
11071107
vjust = 1,
11081108
gp = grid::gpar(cex = 1.3,

R/data.R

Lines changed: 13 additions & 12 deletions
Original file line numberDiff line numberDiff line change
@@ -15,6 +15,7 @@
1515
#' for senescent samples, "young" for proliferative).}
1616
#' }
1717
#'
18+
#'
1819
#' @source \url{https://www.ncbi.nlm.nih.gov/geo/query/acc.cgi?acc=GSE63577}
1920
#'
2021
#' @references Marthandan S, Priebe S, Baumgart M, Groth M et al. Similarities
@@ -24,23 +25,23 @@
2425
#' @references Marthandan S, Baumgart M, Priebe S, Groth M et al. Conserved
2526
#' Senescence Associated Genes and Pathways in Primary Human Fibroblasts
2627
#' Detected by RNA-Seq. PLoS One 2016;11(5):e0154531. PMID: 27140416
27-
#'
28-
#' @keywords datasets
28+
#'
29+
#' @usage data(metadata_example)
2930
"metadata_example"
3031

3132
#' Gene Expression Counts for Marthandan et al. (2016) RNA-Seq Data
3233
#'
33-
#' A numeric matrix containing filtered and normalized gene expression data from
34-
#' the Marthandan et al. (2016) study (GEO accession GSE63577).
34+
#' A numeric matrix containing filtered and normalized (non log-transformed)
35+
#' gene expression data from the Marthandan et al. (2016) study (GEO accession
36+
#' GSE63577).
3537
#'
3638
#' Raw FASTQ files were downloaded using `fasterq-dump` (v2.11.0) and processed
3739
#' in a reproducible conda environment (Python v3.11.5). Quality control was
3840
#' conducted using FastQC (v0.12.1) and summarised with MultiQC (v1.14).
3941
#' Pseudo-alignment to the RefSeq transcriptome (NCBI release 109) was performed
4042
#' using kallisto (v0.44.0). Genes with low expression (mean count < 70 in all
4143
#' conditions) were filtered out. Count normalization factors were calculated
42-
#' with `edgeR::calcNormFactors`, and log2-transformed values were obtained via
43-
#' `limma::voom`.
44+
#' with `edgeR::calcNormFactors`.
4445
#'
4546
#' Intermediate time points for HFF and MRC5 cell lines were excluded, resulting
4647
#' in a final dataset with 45 high-quality samples across proliferative,
@@ -52,7 +53,7 @@
5253
#'
5354
#' @format A numeric matrix with rows as genes (gene symbols) and columns as
5455
#' samples (sample IDs).
55-
#'
56+
#'
5657
#' @source \url{https://www.ncbi.nlm.nih.gov/geo/query/acc.cgi?acc=GSE63577}
5758
#'
5859
#' @references Marthandan S, Priebe S, Baumgart M, Groth M et al. Similarities
@@ -63,8 +64,8 @@
6364
#' Senescence Associated Genes and Pathways in Primary Human Fibroblasts
6465
#' Detected by RNA-Seq.
6566
#' *PLoS One* 2016;11(5):e0154531. PMID: 27140416
66-
#'
67-
#' @keywords datasets
67+
#'
68+
#' @usage data(counts_example)
6869
"counts_example"
6970

7071
#' Example Gene Sets for Cellular Senescence
@@ -75,15 +76,15 @@
7576
#' curated gene set of commonly reported senescence markers,
7677
#' with directionality (+1 or -1).}
7778
#' \item{REACTOME_Senescence}{Character vector of gene symbols. The
78-
#' REACTOME_CELLULAR_SENESCENCE from MSigDB pathway. No directionality.}
79+
#' REACTOME_CELLULAR_SENESCENCE from MSigDB database No directionality.}
7980
#' \item{HernandezSegura}{A data frame with columns `gene` and `direction`.
8081
#' A gene set from Hernandez-Segura et al. (2017), with directionality (+1 or -1).}
8182
#' }
82-
#'
83+
#'
8384
#' @references Hernandez-Segura A, de Jong TV, Melov S, Guryev V, Campisi J,
8485
#' Demaria M. Unmasking Transcriptional Heterogeneity in Senescent Cells.
8586
#' *Curr Biol.* 2017 Sep 11;27(17):2652-2660.e4. doi: 10.1016/j.cub.2017.07.033.
8687
#' Epub 2017 Aug 30. PMID: 28844647; PMCID: PMC5788810.
87-
#' @keywords datasets
88+
#' @usage data(genesets_example)
8889
"genesets_example"
8990

0 commit comments

Comments
 (0)