R-使用tmap()绘图不显示图例
我使用R-使用tmap()绘图不显示图例,r,plot,tmap,R,Plot,Tmap,我使用tmap包。我使用qtm()功能绘制地图,但不显示图例。事实上,我知道图例是自动显示的,除非您指定隐藏它 我还尝试使用tm\u add\u legend()的变通方法,但它不起作用 这是我的密码: library(sp) ; library(rgdal) ; library(rgeos) ; library(tmap) ; library(maptools) Directory <- "" MapFrance <- readOGR(dsn = paste0(Directo
tmap
包。我使用qtm()
功能绘制地图,但不显示图例。事实上,我知道图例是自动显示的,除非您指定隐藏它
我还尝试使用tm\u add\u legend()
的变通方法,但它不起作用
这是我的密码:
library(sp) ; library(rgdal) ; library(rgeos) ;
library(tmap) ; library(maptools)
Directory <- ""
MapFrance <- readOGR(dsn = paste0(Directory, "Departements"), layer = "DEPARTEMENT")
MapFrance@data$Score <- round(runif(96, min = 1, max = 10), 0)
brk <- c(1, 2.5, 5, 7.5, 10)
ClassScore <- classIntervals(MapFrance@data$Score, style = "fixed", fixedBreaks = brk)
Palette <- brewer.pal(length(brk) - 1, "Greens")
MapFrance@data$Categorie <- as.character(cut(MapFrance@data$Score,
breaks = ClassScore$brks,
labels = Palette,
include.lowest = TRUE))
ExampleData <- MapFrance[MapFrance$CODE_REG == "11", ]
qtm(ExampleData, fill = "Categorie", text = "CODE_DEPT", text.size = "AREA", style = "gray",
text.root = 5, fill.title = "Opinion scale")
library(sp);图书馆(rgdal);图书馆(rgeos);
图书馆(tmap);图书馆(地图工具)
目录具有三个优点的解决方案:
- 解决传奇问题
- 解决标题问题
- 避免在绘图之前调用
classIntervals
离散连续变量
守则:
library(sp) ; library(rgdal) ; library(rgeos) ;
library(tmap) ; library(maptools)
Directory <- ""
MapFrance <- readOGR(dsn = paste0(Directory, "Departements"), layer = "DEPARTEMENT")
MapFrance@data$Score <- round(runif(96, min = 1, max = 10), 0)
ExampleData <- MapFrance[MapFrance$CODE_REG == "11", ]
brk <- c(1, 2.5, 5, 7.5, 10)
tm_shape(ExampleData) +
tm_fill("Score",
title = "Satisfaction score",
style = "fixed",
breaks = brk,
palette = brewer.pal(length(brk) - 1, "Greens"),
auto.palette.mapping = FALSE) +
tm_borders() +
tm_text("CODE_DEPT",
size = "AREA",
root = 10) +
tm_layout(main.title = "Satisfaction score in France",
legend.position = c("left", "bottom"))
library(sp);图书馆(rgdal);图书馆(rgeos);
图书馆(tmap);图书馆(地图工具)
目录附加注释:也不显示绘图标题。