I cannot attach the R script. Here is the script for the example:
#packages
library(MSstats)
#set working directory to current folder of R script
setwd(dirname(rstudioapi::getActiveDocumentContext()$path))
# input
test2 <- readRDS(file = "test.rds")
##### msstats analysis ######
msstats_dataprocess <- MSstats::dataProcess(raw = test2,
normalization = F,
MBimpute = F)
#investigate this
msstats_dataprocess$ProcessedData %>% View()
#contrast.matrix for comparison
comparison <- data.frame(V1 = 1, V2 = -1)
colnames(comparison) <- levels(msstats_dataprocess$ProcessedData$GROUP_ORIGINAL)
rownames(comparison) <- c("Group.A vs Group.B")
msstats_comparison <- MSstats::groupComparison(data = msstats_dataprocess, contrast.matrix = comparison)
msstats_comparison$ComparisonResult %>% View()