使用grid.arrange组合多个树状图

我想将treemap包与grid.arrange结合使用。以“常规”方式将树映射指定给值似乎不起作用

library(treemap) 
library(gridExtra) 
data(business)

P1 <- treemap(business,
index=c("NACE1", "NACE2", "NACE3"),
vSize="turnover
type="index")

库（treemap）
图书馆（gridExtra）
数据（商业）
P1请提供一个可复制的示例。为此，您需要添加示例数据和加载的所有库。最后一行不起作用，因为这正是我的问题，thanx library（treemap）library（gridExtra）data（business）p1我无意中找到了答案，此链接有助于：请提供一个可复制的示例。为此，您需要添加示例数据和加载的所有库。最后一行不起作用，因为这正是我的问题，thanx library（treemap）library（gridExtra）data（business）p1我无意中找到了答案，此链接有助于：
P2 <- treemap(business,
index=c("NACE1", "NACE2", "NACE3"),
vSize="turnover",
type="index")

grid.arrange(P1,P2)