外部パッケージを使わずにRでかなりのバイプロットを作るには？

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のそれらと一致します。 2つのバージョンではy軸が反転しているようです。

prcompから返された構造は、あなたがよりよいスタイルでものを作るために必要なものを持っています。あなたは楕円を追加するための

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

でプロットベースRから希望のプロットを得ることができる投影点はPCA$xに、私はいつも車のパッケージからdataEllipseを使用しているが、それはにあなたの要求の外に行きます他のパッケージを使用しないでください。

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あなたは調整の多くの種類を行うことができます。ヘルプページを見て、好みに合わせて調整してください。