lubridate：如何解析月年？

Question

我有一列日期如下，

> mymonth = c('10/2015','11/2016','12/2016')
> data <- data_frame(mymonth)
> data
# A tibble: 3 × 1
  mymonth
    <chr>
1 10/2015
2 11/2016
3 12/2016

在这里，很明显，我的月份对应于一年中的某个特定月份。2015 年 10 月、2015 年 11 月和 2015 年 12 月。

我无法正确解析这些日期lubridate。假定月份对应于该月的最后一个工作日。

我怎样才能把这个变量翻译成一个date可以lubridate理解的变量？

谢谢~

Answer 1

library(zoo)
as.yearmon(mymonth, "%m/%Y")
[1] "Oct 2015" "Nov 2016" "Dec 2016"

as.Date(as.yearmon(mymonth, "%m/%Y"))
[1] "2015-10-01" "2016-11-01" "2016-12-01"

或其他解决方法，

as.Date(paste0("01/", mymonth),format = "%d/%m/%Y")
[1] "2015-10-01" "2016-11-01" "2016-12-01"