changeset 43:dc0904796d06 draft

Uploaded
author proteomisc
date Sat, 16 Dec 2023 13:29:28 +0000
parents fadbdd8d76d5
children 10e058addc0c
files preprocess_datasets/Agilent_Two_Colors_Preprocessing_Functions.R
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/preprocess_datasets/Agilent_Two_Colors_Preprocessing_Functions.R	Sat Dec 16 13:24:48 2023 +0000
+++ b/preprocess_datasets/Agilent_Two_Colors_Preprocessing_Functions.R	Sat Dec 16 13:29:28 2023 +0000
@@ -10,7 +10,8 @@
   MAb$A=NaRV.omit(as.data.frame(MAb$A))
   MAb$genes=(MAb$genes[(MAb$genes$ProbeName %in% c(rownames(MAb$A),rownames(MAb$M))),])
   RG.pq <<- RG.MA(MA)
-  MA.avg <- suppressWarnings(suppressMessages(avereps(MAb,ID=MAb$genes$ProbeName)))
+  MA.avg <- suppressWarnings(suppressMessages(avereps(MAb)))
+  #MA.avg <- suppressWarnings(suppressMessages(avereps(MAb,ID=MAb$genes$ProbeName)))
   data_matrix=NaRV.omit(MA.avg$M)
   colnames(data_matrix)<-designo$sample
   write.table(format(data_matrix, justify="right"),sep="\t", quote=FALSE,