Problem using custom function to save plot

Question

I am making a function for easily save my plots. I wrote the function as follows:

Cases07 <- plot_usmap(data = data, values = "case2107_rate1000"