是否可以将多层ScatterD3图重叠在一起?我无法在小插曲或搜索StackExchange / Google的任何地方找到它。
我很好奇,因为人们已经能够使用ScatterD3制作PCA Vector Loading图。如果一个人可以将这个点覆盖在另一个带有点的情节之上(类似于ggplot2
或ggvis
图层可能的情况),你可以拥有一个华丽的交互式PCA情节。此外,您可以概述点(因为点击当前不是一个选项)。
有没有人有任何见解或解决方法?
答案 0 :(得分:0)
有可能,但更难。我建议使用plotly
包。您将能够使用RStudio中的“视图”选项卡,并通过旋转更轻松地检查3D散射。配色方案也更容易添加This post尝试解决类似问题,但不完全相同。可以找到plotly
的好(免费)教程here through DataCamp。
答案 1 :(得分:0)
Question answered here感谢ScatterD3的作者。要生成完整的PCA图,您需要重新定义所绘制的数据框,如下所示:
library(FactoMineR)
library (ScatterD3)
out<-PCA(iris[,1:4],scale.unit = TRUE, graph=FALSE)
cc1<-data.frame(out$ind$coord)
cc2<-data.frame(out$var$coord)
points <- data.frame(x = cc1$Dim.1,
y = cc1$Dim.2,
color = iris$Species,
lab = row.names(iris),
type = rep("point", 150))
arrows <- data.frame(x = cc2$Dim.1,
y = cc2$Dim.2,
color = "Blue",
lab = row.names(cc2),
type = rep("arrow", 4))
data1 <- rbind(points, arrows)
scatterD3(data1, x = x, y = y,
lab = lab, type_var = data1$type, col_var = color)