Convert names of vector objects into the tags of the list of vectors with R

Question

I have some vectors, like this:

months <- c("january", "february", "march", "october", "december") 
weekd