R 在另存为PNG之前隐藏htmlwidget绘图元素

我一直在使用R的一个名为‘aweSOM’的图书馆.它是一个基于为自组织 map (SOM)提供HTML交互视觉效果的库.

aweSOM产生了一些比类似SOM包更好的视觉效果，所以我会使用它.然而，问题是两个方面的:

1. 超文本标记语言--交互的视觉效果不适合发布.
2. 当我另存为PNG时， PNG '悬停在情节上以获取信息."

因此，我想知道是否有可能编写一个函数，使"plot"保存为PNG，但没有上面的交互式文本？

因此，有效地编写一个函数，只保存一个特定大小的正方形，从而省略文本？

感谢您的反馈和帮助.

install.packages("aweSOM")
library(aweSOM)

full.data <- iris
train.data <- full.data[, c("Sepal.Length", "Sepal.Width", "Petal.Length", "Petal.Width")]
train.data <- scale(train.data)

set.seed(1465)
init <- somInit(train.data, 4, 4)
iris.som <- kohonen::som(train.data, grid = kohonen::somgrid(4, 4, "hexagonal"), 
                         rlen = 100, alpha = c(0.05, 0.01), radius = c(2.65,-2.65), 
                         dist.fcts = "sumofsquares", init = init)

superclust_pam <- cluster::pam(iris.som$codes[[1]], 3)
superclasses_pam <- superclust_pam$clustering

###########
#PROBLEMATIC PLOT WITH INTERACTIVE TEXT
##########

plot <- aweSOMplot(som = iris.som, type = "Cloud", data = full.data, 
           variables = c("Species", "Sepal.Length", "Sepal.Width",  
                         "Petal.Length", "Petal.Width"), 
           superclass = superclasses_pam)

所有的帮助将被感激与修复可视化.这里有一个小插曲:

https://cran.r-project.org/web/packages/aweSOM/vignettes/aweSOM.html#the-awesom-package