added alternative visual using ggplot2