526互联

R语言中绘图 设置图例

发布时间 2023-07-26 00:34:10作者: 小鲨鱼2018

 

001、基础绘图

p <- ggplot(mtcars,aes(mpg,hp,colour=factor(cyl)))+geom_point()
p             ## 基础绘图

 

002、删除图例标题

p +  theme(legend.title = element_blank())     ## 删除图例标题

 

 

003、删除图例

p + theme(legend.position = "none")

 

004、设置图例位置

p + theme(legend.position = "top")

 

005、设置图例方向

p + guides(color = guide_legend(direction = "horizontal"))    ## 设置为水平方向

 

006、设置图例标题外观

p + theme(legend.title = element_text(color = "chocolate", 
                                      size = 14, face = "bold"))

 

007、设置图例标题的名称

p +  labs(color = "11111\n222222\n3333:") + 
  theme(legend.title = element_text(color = "chocolate", 
                                      size = 14, face = "bold"))

 

008、设置图例标题名称

p +  scale_color_discrete(name = "xxx\nyyy\nzzz") + 
  theme(legend.title = element_text(color = "chocolate", 
                                      size = 14, face = "bold"))

 

009、修改图例顺序

library(ggplot2)
ggplot(mtcars,aes(mpg,hp,colour=factor(cyl)))+geom_point()     ## 默认顺序

 

mtcars$cyl  <- factor(mtcars$cyl, levels = c("8", "4", "6"))      ## 修改图例顺序
ggplot(mtcars,aes(mpg,hp,colour=factor(cyl)))+geom_point()

 

010、自定义图例名称

p + scale_color_discrete(name = "Seasons:", labels = c("xxxxx",
                          "yyyyyy", "zzzzzz"))

 

011、设置图例填充色

p + theme(legend.key = element_rect(fill = "cyan"))

 

012、设置图例符号的大小

p + guides(color = guide_legend(override.aes = list(size = 20)))

 

。