tm_shape(World) +
	tm_polygons(fill = "gender",
				fill.scale = tm_scale_continuous(values = "-hcl.cyan_magenta")) +
	tm_bubbles(size = "pop_est") +
	tm_compass() +
	tm_scalebar() + tm_layout(scale = 0.4)