可逐一构建或删除ggplot分面面板,具体步骤如下:
library(ggplot2)
# 构建数据框
data_df <- data.frame(
x = rep(c("A", "B"), each = 4),
y = rnorm(8),
facet = rep(c("C", "D"), 4)
)
# 输出数据框
data_df
# 按照 x 统计并创建对象 plot1
plot1 <- ggplot(data_df, aes(x = x, y = y)) +
geom_point()
# 输出 plot1
plot1
# 将绘图面板分为两个面板,指定分面变量为 facet 绘图属性
facet1 <- plot1 + facet_wrap(~ facet, ncol = 2)
# 输出 facet1
facet1
# 删除分面变量为 "C" 的面板,并输出 facet2
facet2 <- facet1 %+% subset(data_df, facet != "C")
facet2
以上就是'Build (or delete) panels of ggplot facet one at a time