对于另一个日期问题，我很抱歉，但我找不到答案。 我有一个日期类型“2017 年 9 月”，需要将其转换为“2017 年 9 月 30 日”（月份的最后一天——所有年份的所有月份）。 我试过了：
date <- as.Date(date), "%B %d %Y")
+ %d%m%y 的变体
还有：
library(zoo)
date <- as.Date(as.yearmon(date))
但每次我都有NA。
【问题讨论】：
as.Date(paste(30, "September 2017"), format="%d %B %Y")。你需要包括一天。月年不够。
%B。
> as.Date(paste(01, "September 2017"), format="%d %B %Y") [1] NA
这对我有用：
> library(zoo)
> s = "September 2017"
> as.yearmon(s)
[1] "Sep 2017"
如果我然后转换为日期，它会得到当月的第一天：
> as.Date(as.yearmon(s))
[1] "2017-09-01"
这似乎正是您正在做的事情，但您没有明确向我们展示您的“2017 年 9 月”字符串在哪里，所以我怀疑那里有问题...
至于“30日”，二月你打算做什么？您可以使用frac=1 获取本月的最后一天（帽子提示@Henrik）：
> as.Date(as.yearmon(s),frac=1)
[1] "2017-09-30"
> as.Date(as.yearmon("February 2018"),frac=1)
[1] "2018-02-28"
> as.Date(as.yearmon("February 2020"),frac=1)
[1] "2020-02-29"
【讨论】：
date <-append(unlist(strsplit(file.list[i], ' '))[5], unlist(strsplit(file.list[i], ' '))[6]) year <- strsplit(date[2], '.', fixed=TRUE)[[1]][1] date <- sub(',', '', date) paste(date[1], year, collapse =' ') 然后：date <- as.Date(as.character(paste(date[1], year, collapse =' ')), "%B %d %Y") 或 date <- as.Date(as.yearmon(paste(date[1], year, collapse =' ')))
as.Date.yearmon的frac参数