Data is available from here
dat = Import["MEI-B_LDS1.xlsx", {"Sheets", "Data"}];
I have replaced all N/A
to Missing[]
.
BoxWhiskerChart[{Values[#]}, ChartLegends -> Keys[#]] &@ GroupBy[dat[[2 ;;, {3, 11}]], First -> Last]
But then how to I change the labels so that they are rotated 180 degree under the axis? Like this example
Best I can do is
BoxWhiskerChart[{Values[#]}, ChartLabels -> Placed[Keys[#], Axis]] &@ GroupBy[dat[[2 ;;, {3, 11}]], First -> Last]
Struggling with the rotation due to the use of (nested?) pure functions here.