ggplot中的图例是否可以使用缺少的构面空间？

Question

以下是可重现的示例：

library(magrritr)
library(ggplot2)
dplyr::bind_rows(iris,iris,iris, .id = "df") %>%
  ggplot(aes(x = Petal.Width, y = Petal.Length, color = Species)) + 
  geom_point() + 
  facet_wrap(~ df, ncol = 2)

由于缺少“小平面”，图例在空白时占图像宽度的很大比例。

是否可以将图例移至右下角（“缺失”构面）以增加其他图的宽度并保留图例信息？