我有一张加利福尼亚的地图,我在弗雷斯诺县和图莱里县用两种不同的颜色着色。我只想添加一个图例,说明弗雷斯诺县是黄色的,而图莱里县是浅蓝色的。我一直在使用 tigris 和 sf 包以及 ggplot2。这是我到目前为止的代码:
除了我认为要创建图例的代码(来自主题的所有内容(legend.title ---etc.)
# Reading in the necessary packages
library(tidyverse)
library(sf)
library(tigris)
library(rnaturalearth)
library(rnaturalearthdata)
options(tigris_use_cache=T)
# Creating Geoms
world <- ne_countries(scale="medium", returnclass="sf")
california_counties <- counties(state="CA", class="sf")
los_angeles_county <- counties(state="CA", class="sf") %>%
filter(NAME=="Los Angeles")
orange_county <- counties(state="CA", class="sf") %>%
filter(NAME=="Orange")
# Creating a Map
california_map <- ggplot(data=world)+
geom_sf(data=california_counties, color="blue", fill="blue")+
geom_sf(data=los_angeles_county, color="yellow", fill="yellow")+
geom_sf(data=orange_county, color="lightblue",fill="lightblue")+
theme(legend.title=element_blank())+
scale_fill_manual(values=c("yellow", "lightblue"),
labels=c("Los Angeles County", "Orange County"))
california_map