Tinh chỉnh chú giải và vài chỉnh sửa cuối

library(tmap)

tm_shape(nyc_tracts_merge) +
  # Add title and change palette
  tm_fill(col = "estimate", 
          ___,
          ___) +
  # Add tm_borders()
  ___ +
  tm_shape(water) +
  tm_fill(col = "grey90") +
  tm_shape(manhat_hoods) +
  # Change col and lwd of neighborhood boundaries
  tm_borders() +
  tm_text(text = "name", size = 0.5) +
  # Add tm_credits()
  
  
        
# Save map as "nyc_income_map.png"