Если вы хотите преобразовать как дату:
as.Date(paste0(201603, 01), format = "%Y%m%d")
Это создаст формат 2016-03-01 как дату, а не как символ. Если вы хотите использовать во всех строках столбца Date
data <- data %>%
mutate(Date = as.Date(paste(Date, 01) format = "%Y%m%d")