Update XcmsExperiment-functions.R

sneumann · Nov 20, 2024 · 367aada · 367aada
1 parent 8403d58
commit 367aada
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/XcmsExperiment-functions.R b/R/XcmsExperiment-functions.R
@@ -833,7 +833,7 @@
             res$peak_id <- ids
             info <- pk[res$peak_id, peaksInfo]
             colnames(info) <- paste("peak_", peaksInfo, sep = "")
-            res2@backend@spectraData <- cbind(res2@backend@spectraData, info)
+            res@backend@spectraData <- cbind(res@backend@spectraData, info)
             res
         },
         MoreArgs = list(msLevel = msLevel, method = method),