diff --git a/2A_2016_Result_Analysis_2016_and_Historic_Trend.r b/2A_2016_Result_Analysis_2016_and_Historic_Trend.r
index ebe66f5..d59348c 100644
--- a/2A_2016_Result_Analysis_2016_and_Historic_Trend.r
+++ b/2A_2016_Result_Analysis_2016_and_Historic_Trend.r
@@ -60,7 +60,7 @@ PLOT_DATA <- rbind(OTHER,KEM)
 
 
 
-POP_DIFF_PLOT <- ggplot(PLOT_DATA ,aes(x=Year,y=Population,group=Region,color=Region))+geom_line(linewidth=2)+scale_color_manual(values=c("cadetblue","darkred"))+ scale_x_continuous(breaks = c(seq(1910, 2025, by = 10)))+ scale_y_continuous(breaks = seq(0, 35000, by = 1000))+ theme_bw()+ theme(legend.position = "bottom")
+POP_DIFF_PLOT <- ggplot(PLOT_DATA ,aes(x=Year,y=Population,group=Region,color=Region))+geom_line(linewidth=2)+scale_color_manual(values=c("cadetblue","darkred"))+ scale_x_continuous(breaks = c(seq(1910, 2025, by = 10)))+ scale_y_continuous(breaks = seq(0, 35000, by = 1000),limits=c(0,NA))+ theme_bw()+ theme(legend.position = "bottom")
 png(paste0(SAVE_PRELIM_LOC,"Population_Historic_Plot.png"), width = 12, height = 8, units = "in", res = 600)
 POP_DIFF_PLOT 
 dev.off()