library(tmap)
tm_shape(World)+
tm_polygons(
fill = "#CD3333", # fill color
col = "#2F4F4F", # line color
lwd = 0.9, # line width
lty = "dotdash") # line type
## [tip] Consider a suitable map projection, e.g. by adding `+ tm_crs("auto")`.
## This message is displayed once per session.

tm_shape(World)+
tm_polygons(fill = "#CDCD00") + # constant fill color
tm_symbols(size = "pop_est", # data variable, mapped to symbol size
fill = "well_being", # data variable, mapped to symbol fill color
shape = "income_grp") # data variable, mapped to symbol shape

tm_shape(World)+
tm_polygons (fill = "HPI")

tm_shape(World)+ tm_polygons (
fill = "HPI",
fill.scale = tm_scale_intervals (
style = "fisher" , # a method to specify the classes
n = 7, # number of classes
midpoint = 38, # data value mapped to the middle palette color
values = "matplotlib.rd_yl_gn" # color palette;
# run cols4all::c4a_gui() to explore color palettes
))

library(tmap)
tm_shape(World)+ tm_polygons (
fill = "HPI",
fill.scale = tm_scale_intervals (
style = "fisher" , # a method to specify the classes
n = 7, # number of classes
midpoint = 38, # data value mapped to the middle palette color
values = "pu_gn_div " # color palette;
# run cols4all::c4a_gui() to explore color palettes
))

tm_shape(World) +
tm_polygons(
fill = "HPI",
fill.scale = tm_scale_intervals(
breaks = c(0, 10, 20, 30, 40, 50, 60),
values = "pu_gn_div",
labels = c("0–10", "10–20", "20–30", "30–40", "40–50", "50–60")
)
)

tm_shape(World)+
tm_polygons(
fill = "HPI",
fill.scale = tm_scale_continuous(
limits = c(10, 60),
values = "scico.hawaii"))
## [plot mode] fit legend/component: Some legend items or map compoments do not
## fit well, and are therefore rescaled.
## ℹ Set the tmap option `component.autoscale = FALSE` to disable rescaling.

tm_shape(World) +
tm_polygons(
fill = "income_grp",
fill.scale = tm_scale_categorical())

tm_shape(metro) +
tm_bubbles(size = "pop2020") +
tm_basemap("OpenTopoMap")

tm_shape(World, crs = "+proj=eqearth") +
tm_polygons(
fill = "HPI") +
tm_layout(bg.color = "#2F4F4F",
earth_boundary = TRUE,
frame = TRUE,
space.color = "#C1CDCD")

tm_shape(World,
bbox = "FULL",
crs = "+proj=ortho +lat_0=23 +lon_0=90") +
tm_polygons() +
tm_xlab("Longitudes") +
tm_ylab("Latitudes")+
  tm_layout(bg.color = "#458B74",
earth_boundary = TRUE,
frame = TRUE,
space.color = "#C1CDCD")

tm_shape(World,
bbox = "FULL",
crs = "+proj=ortho +lat_0=23 +lon_0=0") +
tm_polygons() +
tm_xlab("Longitudes") +
tm_ylab("Latitudes")+
tm_graticules(n.x = 20, n.y = 10, col = "black", lwd = 2, labels.show = TRUE)+
   tm_layout(bg.color = "#8FBC8F",
earth_boundary = TRUE,
frame = TRUE,
space.color = "#C1CDCD")

tm_shape(World,
bbox = "FULL",
crs = "+proj=ortho +lat_0=30 +lon_0=0") +
tm_polygons() +
tm_xlab("Longitudes") +
tm_ylab("Latitudes")+
tm_graticules(n.x = 20, n.y = 10, col = "black", lwd = 2, labels.show = FALSE)+
tm_style("natural")