如何从列中绘制 ggplot 中的分类和数字数据？

如何解决如何从列中绘制 ggplot 中的分类和数字数据？

我有两个数据框，我想按类别名称绘制数据，但类别是没有为每一行给出的列标题。有没有办法在 ggplot（如 facet_wrap）中绘制它而不翻转/重新组织我的数据？

我已经这样做了：

p1 = ggplot()+
  geom_Boxplot(Max_PHT,aes(x = 1,y = Cultivated),colour = 'black')+
  geom_Boxplot( Max_PGL,aes(x = 2,colour = 'blue')+
  xlim('PHT','PGL') +
  xlab('Cultivated')+
  ylab('Peak Annual SWE (mm)')+
  ggtitle('Annual Peak SWE')


p2 = ggplot()+
  geom_Boxplot(Max_PHT,y = Grassland),colour = 'black')+
  geom_Boxplot(Max_PGL,'PGL') +
  xlab('Grassland')+
  ylab('Peak Annual SWE (mm)')

ggarrange(p1,p2)

它总体上有效，但想知道是否有更简单的方法？谢谢！