ISME图表复现之PCA分析图添加统计信息

欢迎关注R语言数据分析指南

❝本节来复现「ISME」上的一张CCA分析的图，作者在常规CCA分析图上加上了一下新的元素使得整体看来有些许特别之处；下面小编就来简单复现一下，数据为随意构建无实际意义。❞

原文

High speciation rate of niche specialists in hot springs

原图

复现图

加载R包

library(tidyverse)
library(ggrepel)
library(FactoMineR)
library(magrittr)
library(factoextra)
library(RColorBrewer)
library(ggh4x)
library(cowplot)

导入数据

df <- read_tsv("data.xls")

PCA分析