如何将这些时间戳转换为其组件？

Question

我在R中有这种数据，我想提取年，月，日等。

19620101
19620102

我能够分解月和日，但是年和月并没有给我正确的答案。你能告诉我为什么吗？

df$year <- format(as.Date(df$DATE),'%Y')
df$month <- format(as.Date(df$DATE),'%m')
df$day <- format(as.Date(df$DATE),'%d')

输出我

55688   01  05
55688   01  06

预期输出

1962   01   01
1962   01   02

Answer 1

也许只是子串？

substring(as.character(19620101), 1, 4)
substring(as.character(19620101), 5, 6)
substring(as.character(19620101), 7, 8)

Answer 2

您可以使用lubridate package。

执行此操作

library("lubridate")
d <- ymd("19620101")
year(d)
month(d)
day(d)