Problem while converting into date format

General
2

library(lubridate)

data<-data %>%
mutate(submission_date=ymd_hms(as.Date(submission_date)))