问题描述
我导入了 csv 文件:
{casesRaw<-read.csv('CasesRaw.csv')
tail(casesRaw$Date)
我的结果:
"12/28/2020" "12/29/2020" "12/30/2020" "12/31/2020" "1/1/2021" "1/2/2021"
转换后:
casesRaw$Date<-as.Date(casesRaw$Date,"%m/%d/%y")
tail(casesRaw$Date)
我的结果是:
[1] "2020-12-28" "2020-12-29" "2020-12-30" "2020-12-31" "2020-01-01" "2020-01-02"
如你所见,我还有 2020-01-01 ,.... 有什么想法吗?
解决方法
我们需要 useOnClickOutside
表示 4 位数字的年份,而不是 %Y
表示 2 位数字的年份
%y
,
这是另一个使用 gsub
casesRaw$Date <- as.Date(gsub("(.*)/(.*)","\\2/\\1",casesRaw$Date))