fortify and plot with ggplot2