相关疑难解决方法(0)

我有一组23个变量的观察结果.

当我使用prcomp和biplot绘制结果时,我遇到了几个问题:

1. 实际绘图仅占据帧的一半(x <0),但绘图以0为中心,因此浪费了一半的空间

2. 两个变量明显地支配着结果,因此所有其他箭头都聚集在一起,我无法读取一个东西

ad 1.我试过设置xlim和/或ylim,但我显然做错了,因为当我做的时候情节都搞砸了

ad 2.我可以以某种方式使箭头标签更加分开,以便我可以阅读它们吗？或者也许我可以只绘制没有两个最长的箭头(放大类型)？

附录:是否有可能让双标签以不同于箭头的颜色绘制标签？

另外:如果x和y轴不成比例,它是否有问题(它们的图表显示x和y上不同长度的间隔).我认为这会使箭头之间的天使产生偏差,而这种调整大小并不是一种相似性的转变.是否可以强制双色图保持1:1的宽高比,或者将图形绘制为矩形而不是正方形？

我试图(部分地)重现在s.class(...)包中ade4使用的群集图ggplot,但这个问题实际上更为通用.

注意:这个问题是指"星形图",但实际上只讨论了蜘蛛图.

df     <- mtcars[,c(1,3,4,5,6,7)]
pca    <-prcomp(df, scale.=T, retx=T)
scores <-data.frame(pca$x)

library(ade4)
km <- kmeans(df,centers=3)
plot.df <- cbind(scores$PC1, scores$PC2)
s.class(plot.df, factor(km$cluster))

我正在寻找的基本特征是"星星",例如从公共点(这里是聚类质心)辐射到一些其他点(这里是聚类中的点)的一组线.

有没有办法使用该ggplot包？如果没有直接通过ggplot,那么有没有人知道一个有用的加载项.例如,有几个变体stat_ellipse(...)不是ggplot包的一部分(这里和这里).

我使用lda()MASS包中的函数进行了线性判别分析.现在我将尝试绘制一个像ade4包(forLDA)中的双标图.你知道我怎么能这样做吗？

如果我尝试使用该biplot()功能它不起作用.例如,如果我使用Iris数据并生成LDA:

dis2 <- lda(as.matrix(iris[, 1:4]), iris$Species)

然后我可以使用该函数绘制它plot(),但如果我使用该函数biplot()它不起作用:

biplot(dis2)
Error in nrow(y) : argument "y" is missing, with no default

如何绘制变量的箭头？