Calculate components of box and whisker plot
When an aesthetic is used an a parameter, like stat_boxplot(width = 3), it will override mappings from data.
width, width of geomgeom_boxplot. Override with the geom argument: stat_boxplot(geom="point").