improved first ggplot examples