search for: pr9549_labelfreedata_byexperimentak

...but this causes all the pairs with even one NA return an NA value. I would prefer not to use for loops as this would slow the script down considerably. #SCRIPT STARTS rm(list=ls()) setwd("C:/Documents and Settings/Amit Patel") #na.strings makes na's readable zz <- read.csv("Pr9549_LabelFreeData_ByExperimentAK.csv",strip.white = TRUE, na.strings = "NA") ix <- seq(from=2,to=62, by=2) averagedResults <- (zz[,ix] + zz[,ix+1])/2 averagedResults <- cbind(zz[,1],averagedResults ) colnames(averagedResults) <- c("PCI","G1-C1","G1-C2","G1-C3",&...