在 R 中按 PCA Biplot 上的数值对数据点进行颜色编码

Colour coding data points by numeric value on PCA Biplot in R

提问人:Liesl Blackman 提问时间:11/17/2023 更新时间:11/17/2023 访问量:21

问:

我已经绘制了一些不同类型的 PCA 双标图,基本上想将它们组合起来。

我有这个图,点按类别颜色编码enter image description here

它的代码如下:

fviz_pca_biplot(lrr.pca, 
                # Fill individuals by groups
                geom.ind = "point",
                pointshape = 21,
                pointsize = 2.5,
                fill.ind = factor(logresponseduration$stressor_group),
                col.ind = "black",
                legend.title = list(fill = "Categories"),
                repel = TRUE) +
  ggpubr::fill_palette("jco") +      # Indiviual fill color
  ggpubr::color_palette("npg")

然后是这个情节

enter image description here

使用以下代码

fviz_pca_ind(lrr.pca, col.ind = logresponseduration$log_response_ratio,
             gradient.cols = c("blue", "red"),
             legend.title = "Cont.Var")

我还希望将梯度点按类别分组:

enter image description here

法典:

fviz_pca_biplot(lrr.pca, 
                col.ind = factor(logresponseduration$stressor_group), palette = "jco", 
                addEllipses = TRUE, label = "var",
                col.var = "black", repel = TRUE,
                legend.title = "Pressure Group")

因此,我希望我的最终输出是第一个图,但数据点按对数响应值进行颜色编码,如第二个图所示,然后按其类别分组,如第三个图所示。

任何帮助将不胜感激

r ggplot2 pca

评论


答: 暂无答案