| calcModfstat {attract} | R Documentation |
Function calculates a modified F-statistic for a set of cluster assignments.
calcModfstat(exprs.dat, cl, class.vector)
exprs.dat |
a |
cl |
a |
class.vector |
a |
This function is called internally by findSynexprs.
a modified F-statistic (average MSS/average RSS) value for a set of cluster assignments.
Jessica Mar
## Not run:
library(cluster)
data(subset.loring.eset)
clustObj <- agnes(as.dist(1-t(cor(exprs(subset.loring.eset)))))
cfmod.vals <- NULL
for( i in 1:10 ){
cfmod.vals <- c(cfmod.vals, calcModfstat(exprs(subset.loring.eset), cutree(clustObj,i), pData(subset.loring.eset)$celltype))
}
k <- (1:10)[cfmod.vals==max(cfmod.vals)]
## End(Not run)