使用R语言timeVariation函数时出现星期几相关错误

问题场景 #

使用R语言openair包绘制timeVariation图时触发错误，运行官方示例代码也出现相同问题。

错误详情 #

Error in `mutate()`: ℹ In argument: `wkday = wday(date, label = TRUE, abbr = FALSE)`. Caused by error in `factor()`: ! invalid 'labels'; length 6 should be 1 or 7

示例代码 #

library(openair)
mary <- importAURN(site = "my1", year = 2000)

timeVariation(mary, 
              pollutant = 'no2',
              type = 'month')

错误原因 #

该错误源于系统本地化设置与lubridate包wday()函数的星期标签生成逻辑不兼容：

• timeVariation函数内部会调用lubridate的wday()生成星期因子，正常情况下一周7天，wday()应返回7个对应标签。
• 若你的系统区域设置中，星期名称的标签数量仅为6个（可能是区域配置错误、特殊区域设置或本地化文件异常），就会导致factor()转换时标签长度不匹配，触发"invalid 'labels'"错误。
• 示例数据同样报错，说明问题不在数据本身，而是系统环境的本地化配置问题。

内容的提问来源于stack exchange，提问作者Jorge Mendoza Ruiz