Wie wird ein gewöhnlicher ggplot mit einem facettierten in cowplot ausgerichtet?

Ich versuche, Plots publikationsreif mit @ zu arrangierecowplot package.
Ich möchte nur, dass die Panels gleich groß und beschriftet sind.

Reproduzierbares Beispiel
library(ggplot2)
library(cowplot)

gg1 <- ggplot(mtcars)+
        geom_point(aes(x=mpg,y=hp))+
        theme_bw()+
        theme(aspect.ratio=1)

gg2 <- ggplot(mtcars)+
        geom_point(aes(x=mpg,y=hp,fill=cyl))+
        facet_wrap(~cyl,ncol=2)+
        theme_bw()+
        theme(aspect.ratio=1,
              legend.position='none')

output <- plot_grid(gg1,gg2, labels = c('A','B'),label_size = 20)
print(output)

Der Code erzeugt diesen Plot.

ie Sie vielleicht sehen, stimmen weder die horizontalen Achsen noch die oberen Kanten der Paneele überei

Das Argumentalign voncowplot funktioniert nicht mit facettierten Plots.

Irgendwelche Ideen

Antworten auf die Frage(8)

Ihre Antwort auf die Frage