as.Date('2011/1/21',format='%Y/%m/%d')
as.Date('2011-1-21',format='%Y-%m-%d') # 连接符号
as.Date('1/21/2010',format='%m/%d/%Y')
# %Y 输出完整的年份
# %y 输出年份的后两位,比如2020年输出"20"
as.Date('02/27/1992',format='%m/%d/%Y') # 大Y
as.Date('02/27/92',format='%m/%d/%y') # 小Y
# %b 输出月份的缩写
# %B 输出月份的全称
as.Date("01-Febrero-2021", format="%d-%B-%Y")
as.Date('1Jan2008',format="%d%b%Y")
# 上面因为地区返回错误
format(Sys.Date(), "%b")
# 该地区不如直接gsub替换
month_abb <- month.abb[1:12]
month_name <- month.name[1:12]
a <- c("01-February-2021","11-October-2020","24-August-2021")
for (i in 1:12) {
eval(parse(text = paste0("a=gsub('", month_name[i], "','", i, "',a)")
))}
a
as.Date(a,format='%d-%m-%Y')
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
- 11
- 12
- 13
- 14
- 15
- 16
- 17
- 18
- 19
- 20
- 21
- 22
- 23