ad642dc6 BA |
1 | # compute the effectives per class |
2 | |
3 | load("~/ownCloud/projects/2014_EDF-Orsay-Lyon2/res/clfit200RC.Rdata") |
4 | clustfactor <- read.table("~/tmp/clustfactorWER15.txt") |
5 | |
6 | aggregate(c(table(res[,1])), by = list(clustfactor$x), FUN = sum) |