在葡萄酒数据示例中,散点图有离散颜色、绿色、红色等组,但我的数据是连续的蓝色标度,这使得很难看到不同的“组”;
pca_whales<-read.table("test.txt", header=T)
attach(pca_whales)
model_pca_whales<-prcomp(pca_whales[,1:7],scale=TRUE)
gg_pca <- ggbiplot(model_pca_whales,obs.scale = 1, var.scale=1, groups=pca_whales$sub, ellipse=F,circle=F,varname.size=3)
gg_pca数据:
sub -3dB -10dB dur freq srt stfreq
1 0.096 0.336 149.814 27.84 32.993 29.25
2 2.83933 11.2806 272.248 27.8561 239.136 27
3 2.22542 10.8201 221.959 27.0887 203.751 26.25
4 0.782222 15.0756 264.598 27.52 192.073 27.75我已经尝试重新编号'sub‘不连续,但这并不影响显示
非常感谢您的任何建议。
发布于 2014-11-18 18:08:26
如果您想要一个与葡萄酒示例类似的输出,则make soure变量(pca_whales$sub)是一个因子变量。否则,您将得到连续的蓝色刻度。
https://stackoverflow.com/questions/23012313
复制相似问题