Я использую пакет pca3d
, и это действительно удобно.Тем не менее, я хотел бы нарисовать полную рамку вокруг моего pca2d
графика результатов, а не просто иметь ось 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")
Дает
Я не могу найти ничего в документации по функции и пакету, хотя этому блоггеру удалось это сделать здесь .