从R Openair更改pollutionRose赛季标题的语言

Question

我使用openair包中的pollutionRose绘制了季节(夏季、春季、秋季和冬季)的图。代码如下：

library(openair)
Sys.setlocale("LC_TIME", "Portuguese")
pollutionRose(ASS_SO2, pollutant = "SO2", type ="season", cols="jet", main=expression(paste("ASS-SO"[2]*" (µg/ "* m^3* ")")))

在每一季的剧情中，我都不能用Sys.Setlocale把英语改成葡萄牙语。我如何修改它？谢谢!

Answer 1

您可以根据季节进行排序，然后手动更改标签。

library(openair)
ASS_SO2_new <- cutData(ASS_SO2, type = "season")
levels(ASS_SO2_new$season) <- c("primavera", "verao", "cair", "inverno")
pollutionRose(ASS_SO2_new, pollutant = "SO2", type ="season", cols="jet", main=expression(paste("ASS-SO"[2]*" (µg/ "* m^3* ")")))