Если я размещаю уровни на графике плотности, было бы целесообразно также отобразить легенду, показывающую дискретные уровни вместо градиента.Как я могу это сделать?
ggplot(faithful, aes(x = eruptions, y = waiting)) + stat_density_2d(aes(fill = stat(level)), geom = "polygon", bins = 4)