2

在葡萄酒数据示例中,散点图具有离散颜色、绿色、红色等的组,但我的数据带有连续的蓝色刻度,这使得很难看到不同的“组”;

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'不连续,但这不会影响显示

任何建议都非常感谢。

4

1 回答 1

1

如果您想要与 wine 示例中类似的输出,请确保您的变量 (pca_whales$sub) 是一个因子变量。否则你会得到连续的蓝色刻度。

于 2014-11-18T10:08:25.920 回答