R: удалить границу при построении графика с помощью ggplot2 + ggExtra + cowplot

Я не мог найти способ не строить внешний кадр при объединении графиков через ggplot2 + ggExtra + cowplot. Я не уверен, где я должен сказать R, но подозреваю, что проблема заключается в ggExtra. Вот пример:

require(ggplot2)
require(cowplot)
require(ggExtra)

# Creat a graph
A <- ggplot(mpg, aes(x = cty, y = hwy, colour = factor(cyl))) +     geom_point(size = 2.5)

# Add marginal histogram
B <- ggExtra::ggMarginal(A,type = 'histogram', margins = 'x', size = 9)

# Combine through cowplot
combo <- plot_grid(B,B,labels=c("A","B"))
plot(combo) # looks fine

# Re-combine through cowplot
plot_grid(B,combo,ncol=1,rel_heights = c(2,3)) # that's where I got an unwanted nasty frame around 'combo'

Любая подсказка будет принята с благодарностью!