2017-11-24 13 views
1

とscatterplot3d、私は次のコードで3D散布図をプロットしようとしています:R:Rで壊れy軸

library(scatterplot3d) 

mtcars$pcolor[mtcars$cyl==4] <- "red" 
mtcars$pcolor[mtcars$cyl==6] <- "blue" 
mtcars$pcolor[mtcars$cyl==8] <- "darkgreen" 
with(mtcars, { 
    s3d <- scatterplot3d(disp, wt, mpg,  
     color=pcolor, pch=19,  
     type="h", lty.hplot=2,  
     scale.y=.75,    
     main="3D", 
     xlab="Displacement", 
     ylab="Weight", 
     zlab="Miles") 
    s3d.coords <- s3d$xyz.convert(disp, wt, mpg) 
    text(s3d.coords$x, s3d.coords$y, 
     labels=row.names(mtcars),  
     pos=4, cex=.5)    

legend("topleft", inset=.05,  
    bty="n", cex=.5,    
    title="Number of Cylinders", 
    c("4", "6", "8"), fill=c("red", "blue", "darkgreen")) 
}) 

しかし、今私は、y軸(重量)を壊したいです。ライブラリplotrixaxis.breakがあることは知っていますが、これをどのように組み合わせてscatterplot3dとしますか?

答えて

0

これは可能かどうかはわかりません。パッケージのドキュメントによると、「ここでは、軸の計算に使用される引数のうちのいくつかは、ここでは適用されません。

Scatterplot3dパッケージの作成者のこの回答に示されているように、目盛りラベルを調整することで可能かもしれませんが、実際のポイントは移動しません。 http://r.789695.n4.nabble.com/scatterplot3d-customise-axes-td4554528.html

最後に、これらのタイプのディスプレイは解釈が難しいと感じています。格子プロット手法を考えてみましょう。

+0

ありがとうございました。自分のデータは少しはっきりしているように見えますが、最終的な考え方はデータの上に滑らかな面を置くことでしょう。 – rororo