字符2数字年转换为年份

Question

使用R

有大量的临床健康数据可供使用，但日期很奇怪

最有问题的是2digityear/halfyear，就像在98/2中一样，意思是在1998中的某个点，在July 1之后

我已经将该列拆分为两个字符列，例如98和2，但现在需要将2数字年份字符串转换为实际年份。

我尝试了as.Date(data$variable,format="%Y")，但是我不仅得到了一个转换为0098而不是1998，我还得到了今天的月份和年份任意添加(实际数据没有月或日)。

如在0098-06-11

我怎么才能得到1998年呢？

Answer 1

不优雅。但是结合使用lubridate和as.Date，你就可以得到它。

library(lubridate)
data <- data.frame(variable = c(95, 96, 97,98,99), date=c(1,2,3,4,5))
data$variableUpdated <- year(as.Date(as.character(data$variable), format="%y"))

而且只有R基

data$variableUpdated <- format(as.Date(as.character(data$variable), format="%y"),"%Y")