r - Grid Extra 中的 Plotrix：“gList”中允许“no grobs”

Question

我使用 Plotrix 创建了一个战舰情节：

k<-battleship.plot(data, main="Distribution",xlab="Type",ylab="Phase", 
                                                        maxxspan=0.6,maxyspan=0.45)

j<-battleship.plot(data2, main="Distribution",xlab="Type",ylab="Phase", 
                                                        maxxspan=0.6,maxyspan=0.45)

我想使用 gridExtra 将两个图一起打印：

library(gridExtra)
grid.arrange(j, k, ncol=1, nrow =2, top=("Types by Phase"))

我收到以下错误：

Error in gList(list(mar = c(2, 5, 5, 1), wrapvp = list(x = 0.5, y = 0.5,  : 
  only 'grobs' allowed in "gList"

我尝试过安排Grob，但没有成功。

怎样才能克服这个问题？ggplot2 绘图效果很好，即使使用相同的数据。