ggplot works in individual code but not work in loop

Question

I am having issue of ggplot in loop. It works well individually.

as below:

*plotgg<-
  ggplot(renewalplot, aes(x = Month,y=Rate)) +
    stat_summary(fun