firx error in slave.c
[epclust.git] / old_C_code / stage2 / src / unused / effectives-per-classe.r
diff --git a/old_C_code/stage2/src/unused/effectives-per-classe.r b/old_C_code/stage2/src/unused/effectives-per-classe.r
deleted file mode 100644 (file)
index a63a8fb..0000000
+++ /dev/null
@@ -1,6 +0,0 @@
-# compute the effectives per class
-
-load("~/ownCloud/projects/2014_EDF-Orsay-Lyon2/res/clfit200RC.Rdata")
-clustfactor <- read.table("~/tmp/clustfactorWER15.txt")
-
-aggregate(c(table(res[,1])), by = list(clustfactor$x), FUN = sum)