我有一个dataset，它有多个列，其中一个是分类变量。分类变量取3个值：1，2，3.我想在ggplot中创建一个图，其中有3个直方图，一个在另一个下面，然后我想在第三个直方图下面添加直方图，其中我们不考虑分类变量。到目前为止，我已经写了下面的代码

#The name of the dataset is dataset.clust

dataset.clust$cluster = factor(dataset.clust$cluster)

library(patchwork)
library(ggplot2

dataset.clust$cluster = factor(dataset.clust$cluster)

hist_plot1 = ggplot(dataset.clust, aes(x = population, fill = cluster)) +
  geom_histogram(position = "identity", alpha = 0.7) +
  facet_wrap(~ cluster, nrow = 3) +
  scale_fill_manual(values = c("red", "green", "blue")) +
  guides(fill = guide_legend(title = "Cluster")) +
  ggtitle("Grouped Histograms for population")

# Second Histogram
hist_plot2 = ggplot(dataset.clust, aes(x = population)) +
  geom_histogram(fill = "yellow", color = "black")

# Combine histograms and arrange vertically
combined_plot = hist_plot1 / hist_plot2

print(combined_plot)

上面的代码给出了this

有人知道如何将这些图合并成一个图，使四个图具有相同的x和y轴？