R在坐标轴刻度线和德语模式栏中以德语显示月份名称

Question

如何将x轴刻度的月份缩写更改为德语（例如，用“ Okt”代替“ Oct”），同时仍保留默认的刻度位置？

x = as.POSIXct(seq(from=900000, to=30000000,by= 60*60*24), origin = "1970-1-1")
y = rep(1,length(x))

plot_one = plot_ly() %>% 
  add_trace(x = x, 
        y = y, 
        type = 'scatter',
        hoverinfo = 'x+y') %>%
  config(locale="de")
plot_one

此外，我希望模式栏按钮的名称以德语显示，我认为可以通过设置locale来完成。

我的密谋版本是“ 4.7.1”。