R Ggplotly：仅特定几何图形/子地块的交互式组件

我试图生成一个交互式散点图矩阵，如下所示：

library(GGally)
library(ggplot2)
library(plotly)
dat <- mtcars[,1:3]

p <- ggpairs(dat)
ggplotly(p)

库（GGally）
图书馆（GG2）
图书馆（绘本）
dat试试看

实现这一目标的方法可能是什么

库（GGally）
图书馆（GG2）
图书馆（绘本）
dat它在GG2列表中给我错误（p，宽度=宽度，高度=高度，工具提示=工具提示，：尝试应用非功能
library(GGally)
library(ggplot2)
library(plotly)
dat <- mtcars[,1:3]

p <- ggpairs(dat)
pp <- ggplotly(p)
for (x in c(1,4,5,7:9)) pp$x$data[[x]]$hoverinfo <- "none" 
pp