using ggplot for data description