diff --git a/DESCRIPTION b/DESCRIPTION index 3f5e090..989aee2 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,7 +1,7 @@ Type: Package Package: MSstatsLiP Title: LiP Significance Analysis in shotgun mass spectrometry-based proteomic experiments -Version: 1.17.0 +Version: 1.17.1 Date: 2024-3-19 Description: Tools for LiP peptide and protein significance analysis. Provides functions for summarization, estimation of LiP peptide abundance, @@ -20,7 +20,7 @@ Authors@R: c(person("Devon", "Kohler", email = "kohler.d@northeastern.edu", role License: Artistic-2.0 Depends: R (>= 4.1) Imports: dplyr, gridExtra, stringr, ggplot2, grDevices, MSstats, MSstatsConvert, - data.table, Biostrings, MSstatsPTM, Rcpp, checkmate, factoextra, + data.table, Biostrings, MSstatsPTM (>= 2.12.0), Rcpp, checkmate, factoextra, ggpubr, purrr, tibble, tidyr, tidyverse, scales, stats, plotly, htmltools Suggests: BiocStyle, knitr, rmarkdown, covr, tinytest, gghighlight LinkingTo: Rcpp diff --git a/R/groupComparisonLiP.R b/R/groupComparisonLiP.R index 5304b1c..14ea065 100644 --- a/R/groupComparisonLiP.R +++ b/R/groupComparisonLiP.R @@ -92,9 +92,20 @@ groupComparisonLiP <- function(data, contrast.matrix = "pairwise", PROTEIN = data.protein) ## Model - model.data <- groupComparisonPTM(format.data, "LabelFree", contrast.matrix, - FALSE, "BH", log_base, use_log_file, append, - verbose, path, base) + model.data <- groupComparisonPTM( + format.data, + ptm_label_type = "LF", + protein_label_type = "LF", + contrast.matrix = contrast.matrix, + moderated = FALSE, + adj.method = "BH", + log_base = log_base, + use_log_file = use_log_file, + append = append, + verbose = verbose, + log_file_path = path, + base = base + ) model.data$ADJUSTED.Model <- model.data$ADJUSTED.Model[!is.na( model.data$ADJUSTED.Model$Protein)]