r - 仅缩短标签 fe 的首字母

Question

我想绘制一个 PCA，但由于标签重叠，物种名称不再可读。有没有办法让它更清楚？例如使用第一个字母？

PCA地块植被科学：

标签： rplot

Answer 1

您可以使用abbreviate（和ggplot2）。

主成分分析

p <-  prcomp(USArrests, scale=TRUE)

阴谋

library(ggbiplot) 
library(ggrepel)
p1 <- ggbiplot(p) + 
       geom_text_repel(aes(label = rownames(USArrests)))
p2 <- ggbiplot(p) + 
       geom_text_repel(aes(label = abbreviate(rownames(USArrests), minlength = 1)))

library(patchwork)
p1 + p2 # compare the two plots

---

使用base R

biplot(p, xlabs = abbreviate(rownames(USArrests), minlength = 1))