3

3D散布図の「abline」に代わるものはありますか? 「scatterplot3d」パッケージを使用しています。

画像の青い線がやりたいことです。「表面」を追加すると、元のプロットがブロックされます。

ここに画像の説明を入力

4

1 に答える 1

4

このようなもの?

th <- seq(0,8*pi,len=100)
r  <- seq(0,1,len=100)
x  <- r*cos(th)
y  <- r*sin(th)
z  <- 10*r
library(scatterplot3d)
plt <- scatterplot3d(x,y,z, type="l")
plt$points3d(x=c(-1,1,1,-1,-1), y=c(1,1,-1,-1,1),z=rep(5,5), type="l", col="blue", lwd=2)

基本的な考え方は、 によって返されるオブジェクトをキャプチャすることsactterplot3d(...)です。これはリストであり、その要素の 1 つは関数であり、既存のプロットにpoints3d(...)点 (または線) を追加できます。type="l"

于 2015-10-02T06:11:38.403 に答える