change to ggplot() for final panel plots