Ggplot facet detail adjustment summary

brief introduction

Xiaobian introduced some time ago ggplot2 Faceted problem ：R Visible | Split one page and many pictures . And many books have introduced How to use ggplot2 Facet of , Such as ：《ggplot2: Elegant Graphics for Data Analysis》,《R Language course 》.

But the detail adjustment after painting , Hardly introduced . Xiaobian is in the process of learning , Some detail adjustment skills are sorted out , For reference . And share it with you , I hope I can help you ～

The framework of this paper

course

This paper gives an example by simulating data , Readers can use the data form , Load your own dataset , And corresponding data processing .

Generate the data

#  Import package 
library(ggplot2)

set.seed(1)
dat = data.frame("time" = rep(2013:2019,6),
                 "method" = rep(LETTERS[1:6],each = 7),
                 "value" = rnorm(7*6,5,1),
                 "upper" = rnorm(7*6,5,1) + abs(rnorm(7*6,2,0.1)),
                 "lower" = rnorm(7*6,5,1) - abs(rnorm(7*6,2,0.1))
)
head(dat)

Basic version drawing

cols <- c("#85BA8F", "#A3C8DC","#349839","#EA5D2D","#EABB77","#F09594") # Set the color 

p = ggplot(dat,aes(x = time, y = value,fill = method)) +                                                       
  geom_line(aes(color = method)) + # Add line 
  geom_point(aes(color = method)) + # Add scatter 
  geom_ribbon(aes(ymin=lower, ymax=upper), alpha=0.3) + # Add interval 
  scale_x_continuous(breaks = 2013:2019) +
  facet_wrap(vars(method),nrow = 4) + 
  theme_bw() + ylab("Value") + xlab("Time") + # Theme Settings 
  theme(panel.grid = element_blank())
p

Scale modification

By default ,x、y The axis scale is fixed , namely ,scales = "fixed". For details, please refer to ：https://ggplot2-book.org/facet.html.

x Axis

Using the parameter scales = "free_x", modify x Shaft scale .

p + facet_wrap(vars(method),nrow = 4,scales = "free_x")

y Axis

Using the parameter scales = free_y, modify y Shaft scale .

p + facet_wrap(vars(method),nrow = 4,scales = "free_y")

Double axis

Using the parameter scales = free, modify x and y Shaft scale .

p + facet_wrap(vars(method),nrow = 4,scales = "free")

[ Failed to transfer the external chain picture , The origin station may have anti-theft chain mechanism , It is suggested to save the pictures and upload them directly (img-q8BdFXbf-1656937310384)(https://files.mdnice.com/user/5000/9d1e15c9-ebc3-43b2-a892-43a1229eb0b5.png)]

Title box adjustment

This part is all about theme() Adjust in . For details, please refer to ：https://ggplot2-book.org/polishing.html.

Position adjustment

modify strip.position Adjust the position .

p + facet_wrap(vars(method),nrow = 3,strip.position = "left")

Remove the title box background

utilize strip.background = element_blank() Remove the title box background .

p + theme(
        strip.background = element_blank() # Remove the title box background 
  )

Change the background color of the title box

utilize strip.background = element_rect() Change the background color of the title box .

p + theme(strip.background=element_rect(colour="black",
                                      fill="#2072A8"))

Change the text color of the title box

utilize strip.text.x=element_text() Change the text color of the title box .

p +  theme(strip.text.x=element_text(colour="white"))

Delete the title box

utilize strip.text.x = element_blank() Delete the title box .

p +  theme(strip.text.x = element_blank())

Small make up has words

If it helps , Welcome to thumb up , Share ～