Через pivot_longer! Мы переносим столбцы в строчки, тем самым удлиняя используемый датасет.
Для того, чтобы график был показательным, нужно выбирать релевантные по размерности величины (не миллионы и рубли, а миллионы и миллионы).
Смоделировав гипотетические ситуации видно, что величины с матожиданием 2 и 0.5 сопоставимы (левый график), но величины с матожиданием 100 и 0.5 уже не сопоставимы (правый график).
Для удобства восприятия код опубликован на RPubs.
#graph_R
#tidyr
#ggplot2
