revise the ggplot2 warning & shorten the examples