将年月转换为日期格式

convert year and month into date format

我有格式的日期

192607 192608

并希望将它们转换为以下格式并可用于 xts 对象

1926-07-01 1926-08-01

我曾尝试使用 as.date 和 paste() 但无法正常工作。 非常感谢您的帮助。谢谢!!

假设所有日期都将转换为该月的第一天,此 lubridate 解决方案有效。

library(lubridate)

dates <- c(192607, 192608)

dates <- paste0(dates, '01') # add 01 for day of month

# output: "19260701" "19260801"

dates <- ymd(dates)

# output: "1926-07-01" "1926-08-01"

您需要粘贴然后设置格式日期。像这样:

dates <- c("192607", "192608")
dates  <- paste0(dates,"01")
dates <- as.Date(dates, format ="%Y%m%d")
dates

结果是

[1] "1926-07-01" "1926-08-01"