it should be an easy task but I am experiencing an issue.
As per title, I want to divide each cell of the crosstabulation by its column mean. I provide some reproducible example.
This is a small dataset:
mydata <- structure(list(none = c(4, 4, 25, 18, 10), light = c(2, 3, 10,