Отображение векторов разной длины? - Р

Question

У меня есть CSV-файл лесных пожаров.

Данные: https://archive.ics.uci.edu/ml/machine-learning-databases/forest-fires/

Я пытаюсь создать коробочные графики для каждой переменной с осью X, равной месяц / день.

Я не понимаю, почему распечатка переменных не работает, но ссылка на фрейм данных по индексу работает.

createBox <- function(x, y) {
  ggplot(data = forestFires) +
    aes_string(x = x, y = y) +
    geom_boxplot()
}

# code below doesn't work
# Error: Mapped vectors must have consistent lengths:
# * `.x` has length 12
# * `.y` has length 8

x_var_month <- c("jan", "feb", "mar", "apr", "may", "jun", "jul", "aug", "sep", "oct", "nov", "dec")
x_var_day <- c("sun","mon","tue","wed","thu","fri","sat")
y_var <- c("FFMC", "DMC", "DC", "ISI", "temp", "RH", "wind", "rain")

# code below works

x_var_month <- names(forestFires)[3]
x_var_day <- names(forestFires)[4]
y_var <- names(forestFires)[5:12]

monthBox <- map2(x_var_month, y_var, createBox)
dayBox <- map2(x_var_day, y_var, createBox)

monthBox
dayBox

Не думаю, что мне нужно исправлять мой код. Я просто пытаюсь понять это.