ggplot() +
  geom_polygon(data =Map_plot,
               aes(x = long.x, y = lat.x, group = group, fill = RD),
               color = "#636668") +
  scale_fill_gradient(low='#FFFFFF', high='#008275') +
  coord_fixed(1.0)+
  labs(x = NULL, y = NULL, fill = NULL,
       title="",
       subtitle = "")+
  theme(axis.text.x = element_blank(),
        axis.text.y = element_blank(),
        axis.ticks = element_blank(),
        rect = element_blank()) +
  theme_void()
  theme(text = element_text(family = "Gill Sans MT", size = 8),
        plot.title = element_text(size = 12, face = "bold"),
        legend.text = element_text(size = 7),
        legend.position = c(-0.25, 0.55))