R语言ggplot2分面图嵌套：在右上角添加小型分面图

可以使用ggplot2中的grid.arrange()函数来嵌套小的分面图。下面是一个示例代码：

library(ggplot2)
library(gridExtra)

# 生成分面图
p <- ggplot(mpg, aes(x = class, y = hwy)) +
  geom_boxplot() +
  facet_wrap(~manufacturer, ncol = 3)

# 生成嵌套的小分面图
p2 <- ggplot(mpg, aes(x = class, y = hwy)) +
  geom_boxplot() +
  facet_wrap(~year, ncol = 2)

# 将分面图和小分面图嵌套起来
grid.arrange(p, arrangeGrob(p2, top = 'Year'), ncol = 2, widths = c(4, 1))

这将生成一个包含两个列的网格，左边是分面图，右边是小分面图。小分面图位于右上角，并使用top参数添加了一个标题。可以通过调整widths参数来控制分面图和小分面图之间的宽度。