自动将ggplot图例与R中图的宽度对齐

Question

我在R中使用ggplot生成热图。我想将图例在“底部”的宽度与ggplot本身的宽度对齐。

示例代码：

# Load packages
library(tidyverse)

# Create dataframe
df <- expand.grid(x = seq(1,100), y = seq(1,100))

# Add variable
set.seed(123)
df$z <- rnorm(nrow(df))

# Generate plot
ggplot(data = df, aes(x = x, y = y)) +
  geom_tile(aes(fill = z)) +
  theme(legend.position = "bottom")

使用选项legend.key.width = unit(2, "cm")，我可以手动设置宽度。但是，我想知道是否有一种方法可以自动将图例的宽度与图的宽度对齐？