Plot amount of each component in each sample as bar plot
eempf_load_plot(pfmodel)
pfmodel
parafac model
ggplot
data(pf_models) eempf_load_plot(pf4[[1]])