r-如何在ggplot2中设置scale_colour_brewer()的引导大小?

r-How to set the guide size of scale_colour_brewer() in ggplot2?

我使用 ggmap 在 google 地图上绘制散点图。我想调整 scale_colour_brewer() 的指南字体大小。 数据看起来像这样

 shopGlng shopGlat shopPower
1  121.2149 31.04965        35
2  121.5595 31.22596        40
3  121.2326 31.00489        35
4  121.5184 31.22838        35
5  121.5160 31.15689        45
6  121.4557 31.26370        35
7  121.5009 31.25928        35
8  121.1749 30.89317        35
9  121.1990 31.04987        35
10 121.5977 31.26352        35

这是我的代码

library(ggplot2)
library(magrittr)
library(ggmap)

data = read.csv('file')

# ny_center <- geocode("new york", source = "google")
sh_center <- geocode("shanghai", source = "google")
map <- get_googlemap(
  zoom = 11,
  # Use Alternate New York City Center Coords
  center = sh_center %>% as.numeric,
  maptype = "hybrid",
  sensor = FALSE)

color <- as.character(data$shopPower/10)

p <- ggmap(map) +
  geom_point(size = 1,
             data = data,
             aes(x = shopGlng,
                 y = shopGlat,
                 color = color)) +
  xlab("") +
  ylab("") +
  scale_colour_brewer(palette = "Set1", guide = "legend")

p

结果如下。

我想更改颜色条的字体大小。我使用哪个参数显示?

您可以使用 legend.textlegend.title 来设置颜色栏的字体大小。

p <- ggmap(map) +
     geom_point(size = 1,
                data = data,
                aes(x = shopGlng,
                    y = shopGlat,
                    color = color)) +
     xlab("") +
     ylab("") +
     scale_colour_brewer(palette = "Set1", guide = "legend")+
     theme(legend.text = element_text(size=15),
           legend.title = element_text(size=15)  )