在新版本的tmap
(2.3版)中,auto.palette.mapping=FALSE
已被弃用。现在我们必须提供midpoint
。问题是如何选择midpoint
?我有一个倾斜的数据集用于映射。以相等的间隔,调色板中的所有颜色都将出现,但是当我使用style= "fixed"
并提供breaks
时,调色板的所有颜色都不会出现。我正在使用以下代码
library("rgdal")
library("rgeos")
library(tmap)
library(RColorBrewer)
加载数据
Coastal.data <- read.csv("Data.csv")
Output.Areas <- readOGR(".", "Coastal_districts_F")
将数据连接到shapefile
OA.Census <- merge(Output.Areas, Coastal.data, by.x="NAME_2", by.y="Districts")
沿海数据(地区)和沿海地区shapefile(NAME_2)中的公共字段是地区和NAME_2
将坐标系设置为longlat
proj4string(OA.Census) <- CRS("+proj=longlat +datum=WGS84")
映射
tm_shape(OA.Census) + tm_fill(c("Population"),
style = "fixed", breaks =c(0, 50000, 100000, 300000, 600000, 1000000, 1600000),
palette = "-RdYlGn",
title = c("Population"))+
tm_borders(alpha=.4) +tm_scale_bar(position=c("left", "bottom"),size=0.75)+
tm_compass(position=c("center", "top"))+
tm_layout(fontfamily ="serif",legend.text.size = 1.1, legend.title.size = 1.4, legend.position = c("right", "bottom"), frame = T)
绿色逐渐褪色。在早期版本中,使用auto.palette.mapping=FALSE
给了我完美的映射。
当我删除style = "fixed", breaks =c(0, 50000, 100000, 300000, 600000, 1000000, 1600000),
这部分时,它会等间隔地给我调色板中的所有颜色。
该代码的数据已在以下链接http://www.filedropper.com/mappingtmap中提供。