minor changes ggplot