我想从R中的pca3d包中保存pca图形的tiff图像，我已尝试使用下一个代码，但在外面我只得到一个白色图像，控制台返回NULL设备。有人为什么会这样？
tiff("pca.tiff")
pca2d(pca, group=matrix.grupos[,1], show.scale=TRUE, show.centroids=TRUE,
show.group.labels=TRUE)
dev.off()
pca是我的微阵列数据但您可以从包中获取“metabo”数据示例，因此代码将如下所示：
library(pca3d)
data(metabo)
pca <- prcomp(metabo[,-1], scale.= TRUE)
tiff("pca.tiff")
pca2d(pca, group= metabo[,1])
dev.off()