Function failing to return same format for every element for an atomic vector in R

Question

I am trying to set an unique format for every element in an atomic vector composed by dates.

Here\'s the code I am using:

dates <- c("26-08-20