Упорядочить названия в легенде

[VistaSV30]

Добрый день!
Подскажите как поменять порядок месяцев в легенде, чтобы было - Январь, Февраль, Март.

Код: Выделить всё

library(ggplot2)
Mn <- c("Январь", "Февраль", "Март")
Dx <- sample(1:3, 20, replace = T) 
Dy <- runif(20, min = 2, max = 25) 
Dm <- Mn[Dx]

df <- data.frame(Dx, Dy, Dm)
ggplot(df, aes(Dx, Dy, color = Dm)) + geom_point()

Спасибо!

[gamm]

RTFM
RTFM

[VistaSV30]

Эврика!
Оказывается в R для таких случаев есть специальная функция reorder()

Код: Выделить всё

library(ggplot2)
Mn <- c("Январь", "Февраль", "Март")
Dx <- sample(1:3, 20, replace = T) 
Dy <- runif(20, min = 2, max = 25) 
Dm <- Mn[Dx]

df <- data.frame(Dx, Dy, Dm)
# Легенда - Март, Февраль, Январь
ggplot(df, aes(Dx, Dy, color = Dm)) + geom_point()
# Легенда - Январь, Февраль, Март 
ggplot(df, aes(Dx, Dy, color = reorder(Dm, Dx))) + geom_point()

Еще есть базовая функция relevel(df$Dm, ref = "Январь") - устанавливает "Январь" в качестве базового уровня в переменной Dm

И всё работает как надо!

[VistaSV30]

Поля легенды настраиваются следующим образом:

Код: Выделить всё

theme(legend.margin = margin(t = 0, r = -0.5, b = 0.3, l = 0.5, unit = "cm"))

Опять оказалось - всё просто!
Почти две недели не мог понять как настроить размеры полей