How to use `label_date_short`?-CodePudding

How I am using wrongly label_date_short from scales package?

library(tidyverse)
library(scales)


date_taille <- tibble(
  Taille = rep(c("taille_hiver", "taille_ete"), times = 2),
  Date_taille = c("2016-08-01", "2016-02-01", "2018-08-01", "2018-02-01") %>% as.Date()
)

ggplot(date_taille)  
  aes(x = Date_taille, y = Taille)  
  geom_point()  
  scale_x_date(date_breaks = "month", date_labels = label_date_short()) #or label_date()
#> Error in format(x, format = format, tz = tz): arguments inutilisés (format = format, tz = tz)

^{Created on 2022-05-12 by the}