將年月轉換為日期格式

Question

我有日期格式

192607 192608

並希望將它們轉換為以下格式並且可用於 xts object

1926-07-01 1926-08-01

我曾嘗試使用 as.date 和 paste() 但無法使其工作。 非常感謝您的幫助。 謝謝！！

Answer 1

您需要粘貼然后輸入格式日期。 像這樣的東西：

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

結果是

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

Answer 2

假設所有日期都將轉換為該月的第一天，則此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"