qtm(World, fill="MAP_COLORS", fill.palette="Pastel2")
tm_shape(World) +
tm_polygons("MAP_COLORS", palette="Pastel2")
data(World, metro)
World$color <- map_coloring(World, palette="Pastel2")
qtm(World, fill = "color")
# map_coloring used indirectly:
qtm(World, fill = "MAP_COLORS")
Run the code above in your browser using DataLab