Create hist0_ggplot2.R