further plots
used ggplot2