R pca2d绘图中的方框类型

我使用的是

pca3d

软件包，非常方便。但是，我想在我的

pca2d

scores图周围画一个完整的框，而不仅仅是一个x轴

以下代码：

library(pca3d)
set.seed(111)
mat <- matrix(rnorm(10000), ncol = 100)
gps <- rep(c("Group A", "Group B", "Group C", "Group D"), each=25)
pca <- prcomp(mat)
pca2d(pca, group = gps, legend="topright", bty="o")

库（pca3d）
种子（111）
mat您可以只使用base（
图形包
）R的
box（）
命令，例如：

box(which = "plot", lty = "solid")