格式化y轴编号

Question

我正在尝试完成一些格式化Y轴上的数字的操作，以便使小数点和千位标记正确。代码是：

PLOT <- ggplot(df_data,aes(x=day,y=sales))+ 
  geom_point(colour = "#ff3300", size = 3)+
  geom_smooth(span = 0.4,fill="#ffffff") +
  theme(axis.text.x = element_text(size = 10,angle = 60),
        axis.text.y = element_text(size = 15,digits=2, 
          decimal.mark=",",nsmall=2,big.mark = "."), 
        axis.title.y = element_text(size = 16),
        axis.title.x = element_text(size = 16))+ 
  scale_x_date(date_breaks = "1 week", date_labels = "%d/%b") + 
  scale_y_continuous(waiver())

我要修复的部分给我一个错误是

axis.text.y = element_text(size = 15,digits=2, decimal.mark=",",nsmall=2,big.mark = ".")

实际结果是1000、2000、3000等。

所需的输出为1.000、2.000、3.000等。

感谢任何帮助

Tks