# Install packages
if (!requireNamespace("ggplot2", quietly = TRUE)) {
install.packages("ggplot2")
}if (!requireNamespace("RColorBrewer", quietly = TRUE)) {
install.packages("RColorBrewer")
}
# Load packages
library(ggplot2)
library(RColorBrewer)
World Map
Note
Hiplot website
This page is the tutorial for source code version of the Hiplot World Map
plugin. You can also use the Hiplot website to achieve no code ploting. For more information please see the following link:
Setup
System Requirements: Cross-platform (Linux/MacOS/Windows)
Programming language: R
Dependent packages:
ggplot2
;RColorBrewer
Data Preparation
# Load data
<- read.delim("files/Hiplot/116-map-world-data.txt", header = T)
data <- readRDS("files/Hiplot/world.rds")
dt_map
# Convert data structure
$Value <- data$death_rate[match(dt_map$ENG_NAME, data$region)]
dt_map
# View data
head(data)
region death_rate
1 Afghanistan 13.4
2 Albania 6.8
3 Algeria 4.3
4 American Samoa 5.9
5 Andorra 7.3
6 Angola 9.2
Visualization
# World Map
<- ggplot(dt_map) +
p geom_polygon(aes(x = long, y = lat, group = group, fill = Value),
alpha = 0.9, size = 0.5) +
geom_path(aes(x = long, y = lat, group = group),
color = "black", size = 0.2) +
scale_fill_gradientn(
colours = colorRampPalette(rev(brewer.pal(11,"RdYlBu")))(500),
na.value = "grey10",
limits = c(0, max(dt_map$Value) * 1.2)) +
ggtitle("World Map Plot") +
theme_minimal() +
theme(plot.title = element_text(hjust = 0.5),
legend.position = "bottom", legend.direction = "horizontal")
p
