如何在ggplot中將圖例部分放在plot的內部和外部？

Question

有什么方法可以在 plot 中分離圖例？ 我想把它部分放在 plot 的外面和里面。 我試圖通過get_legend （cowplot 庫）在 plot 中分離我想要的圖例，並通過補丁庫中的inset_element添加為 object ......不幸的是，我無法自定義它並且需要具有透明背景的內部圖例。

這是我現在使用的 ggplot 代碼：

ggplot() +
  geom_point(data = tot_grp, aes(x = soc_wat_m, y = obs_m, size = factor(n_group, levels = grp_n), fill = factor(group, levels = grp)), pch = 24) +
  geom_point(data = tot_grp, aes(x = soc_m, y = obs_m, size = factor(n_group, levels = grp_n), fill = factor(group, levels = grp)), pch = 21) +
  
  scale_fill_brewer(name = expression(paste("Classes [",m^-2,"·",yr^-58,"]")), 
                    palette = "PuOr") +
  scale_size_manual(name = "N per class", values = c(1, 2, 3, 4, 5, 6, 7)) +
  guides(fill = guide_legend(override.aes = list(shape = 21, size = 5), order = 2),
         color = guide_legend(override.aes = list(size = 5), order = 1),
         size = guide_legend(override.aes = list(shape = 21), order = 3)) +
  
  labs(x = expression(paste("SOC [kg·",m^-2, "]")),
       y = expression(paste("SOC [kg·",m^-2, "]"))) +
      
  coord_equal()+
  theme_bw()+
  theme(legend.position = "right"
        
  )+
  
  inset_element(p = legend_approach,
                right = 0.5,
                top = 0.55,
                left = 0.95,
                bottom = 0.95,
                clip = TRUE)

legend_approach 是來自 get_legend function 的 object

謝謝！

Answer 1

由於沒有您的數據，我無法重新創建您的 plot。 您可以嘗試將您的圖例 position 編輯到特定位置

theme(legend.position = c(0.8, 0.2))

你可以弄亂特定的數字