Square in ggplot title. Is there any more convenient way of doing .