add title to 2d numeric ggplot