Displaying 1 result from an estimated 1 matches for "numproteins".
Did you mean:
nrproteins
2011 Jan 24
2
normality and equal variance testing
... sinkFilePath = paste("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.noquo...