[英]How to change loading labels of biplot in r?
我正在努力更改雙標圖的加載標簽。 我使用 prcomp function 來運行 PCA 和 ggbiplot。 我試圖用loading.label.label = c("a","b","c","d")
改變它,但它沒有用。 我在下面附上了我的代碼和 plot。
k <- kmeans(comp,2)
TW$Group <- factor(k$cluster)
pca2 <- prcomp(TW[,c(7,11,18,19)], center = TRUE, scale. = TRUE)
summary(pca2)
pca2
cc <- c("a","b","c","d")
library(ggbiplot)
p <- ggbiplot(pca2, group = TW$Group, ellipse = TRUE,loadings.label.repel = TRUE) +
ggrepel::geom_text_repel(aes(colour = TW$Group, label = paste(TW$P,TW$Box)), size = 2.5)+
theme_minimal() +
xlim(-2.5,2.5) + ylim(-2.5,3.5) + theme(legend.position = c(0.9, 0.9))
plot(p)
不確定您是否可以使用ggbiplot
function 執行此操作。 一種解決方法是更改pca
object 中的名稱,如下所示:
library(ggbiplot)
data(wine)
wine.pca <- prcomp(wine, scale. = TRUE)
rownames(wine.pca$rotation) <- rep("my_names", length(wine.pca$center))
print(ggbiplot(wine.pca, obs.scale = 1, var.scale = 1, groups = wine.class, ellipse = TRUE, circle = TRUE))
聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.