添加

...
+ theme(
   legend.key.width = unit(1, "cm"),
   legend.key.height = unit(2, "cm")
  )

，然后将单位更改为最适合您的需求.

and change the units to what best fits your needs.