AQI日历图中星期几如何更改？

请教前辈们一个问题，用R作AQI日历图，图能顺利出来。但是底部的星期显示不正常，只显示一个“星”字，如何更改能变成“一、二、三......”或“Sun,Mon,Tue”形式的呢？下面是我的代码和图。请前辈们指点，谢谢。

library(RColorBrewer)
library(openair)

databjs1<-read.csv("calendarHeat.csv",header=T) 
databjs1$date<-as.Date(databjs1$date)
names(databjs1)[1]<-"date"
breaksbj<-c(0,50,100,150,200,300,500) 
labelw<-c("优","良","轻度污染","中度污染","重度污染 ","严重污染")
colsbj=c(brewer.pal(9,"YlGn")[6],brewer.pal(9,"Set1")[6],brewer.pal(9,"Set1")[5],brewer.pal(9,"Reds")[6],brewer.pal(11,"PRGn")[2],brewer.pal(9,"YlOrBr")[9])
calendarPlot(databjs1,pollutant="AQI",year=2021,month=c(5),breaks=breaksbj,labels=labelw, cols =colsbj,main="5月份AQI日历图")

求帮帮忙

不要沉啊

你好，我是有问必答小助手，非常抱歉，本次您提出的有问必答问题，技术专家团超时未为您做出解答

本次提问扣除的有问必答次数，将会以问答VIP体验卡（1次有问必答机会、商城购买实体图书享受95折优惠）的形式为您补发到账户。

​​​​因为有问必答VIP体验卡有效期仅有1天，您在需要使用的时候【私信】联系我，我会为您补发。