consolidate 1st example both base and ggplot