changed a few lines to plot map using ggplot2 package