외부 패키지를 사용하지 않고 R에서 예쁜 biplot을 만드는 방법은 무엇입니까?

Question

나는 전형적인 R 플롯의 큰 팬이다. 오늘 나는 biplot을 만들어야 만한다. 그러나 전형적인 biplot은 추악하다. 다른 패키지를 사용하지 않고 더 예쁘게 만들고 타원을 그릴 수있는 방법이 있습니까?

만약 가능하지 않다면 고전적인 R 플롯으로 어떻게 그려 볼 수 있습니까?

DF <- iris 
PCA <- prcomp(DF[,c(1:4)], scale. = T, center = T) 
biplot(PCA) 

결과 :

원하는 결과가 (PAST3에서 만든)

Answer 1

나는 당신의 PAST3 버전 플롯 포인트가 보이지 않는 것을 알 수 R biplot에있는 사람들과 일치시킵니다. 두 버전에서 y 축이 뒤집힌 것처럼 보입니다.

prcomp에서 반환 된 구조는 더 멋진 스타일로 만드는 데 필요합니다. 투영 된 점은 그래서 당신은, 난 항상 차 패키지에서 dataEllipse을 사용하여 타원을 추가하려면

plot(PCA$x[,1:2], pch=20, col=iris$Species) 

와 기본 R 플로팅에서 원하는 플롯을 얻을 수 PCA$x에 있지만, 그에게 요청 외부 간다 다른 패키지를 사용하지 마십시오. 주석의 요청으로

UPDATE

, 나는 car 패키지를 사용하여 타원을 추가하는 방법을 추가하고있다.

library(car) 
plot(PCA$x[,1:2], pch=20, col=iris$Species) 
dataEllipse(PCA$x[,1], PCA$x[,2], iris$Species, lwd=1, 
    group.labels = NULL, plot.points=FALSE, add=TRUE, 
    fill=TRUE, fill.alpha=0.02) 

는 내가 좋은 모습 생각 뭔가를 집어하지만 dataEllipse는 조정의 많은 종류를 만들 수 있습니다. 도움말 페이지를보고 취향에 맞게 조정할 수 있습니다.