Displaying 1 result from an estimated 1 matches for "nameproteins".
2011 Jan 24
2
normality and equal variance testing
...t;C:/AnovaData/2WayAnovaForProteins_Set", iIndx,
".txt", sep="")
sink(sinkFilePath)
sourceFilePath = paste("C:/AnovaData/ProteinsFor2WayAnova_Set", iIndx, ".txt",
sep="")
dataSet = read.delim(sourceFilePath)
numProteins = ncol(dataSet)
nameProteins = colnames(dataSet)
for (i in 3:numProteins) {
fla = as.formula(paste(nameProteins[i],"~","Trt*Dose"))
mod = lm(fla, data = dataSet , contrasts = list(Trt = contr.sum, Dose =
contr.sum))
ano = Anova(mod, type = "III")
print.noquote("")
print.noquo...