Create ggplotTitle.R