plot_CV wrong freq (should be actual-wise)

[vbonhomme]

This:

 hearts  %>% filter(aut %in% c("ced", "jeya", "mat", "ponnu"))  %>% efourier()  %>% PCA  %>% LDA(~aut)  %>% plot_CV()

exemplify the problem: sums are not correct, all "actual" column should sum to 1.