Это должно сделать это:
x <- c("01-Jan-2020", "03-Jun-2015")
as.Date(x, format = "%d-%b-%Y")
#> [1] "2020-01-01" "2015-06-03"
# Or with lubridate
lubridate::dmy(x)
#> [1] "2020-01-01" "2015-06-03"
Мы можем подтвердить, что x
был преобразован из символа в дату с помощью:
y <- list(input = x,
lubridate = lubridate::dmy(x),
base = as.Date(x, format = "%d-%b-%Y"))
str(y)
#> List of 3
#> $ input : chr [1:2] "01-Jan-2020" "03-Jun-2015"
#> $ lubridate: Date[1:2], format: "2020-01-01" "2015-06-03"
#> $ base : Date[1:2], format: "2020-01-01" "2015-06-03"