last plot with ggplot2

looks better