在R中,我尝试用以下代码绘制3D散点图:
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轴(权重)。我知道plotrix库中有axis.break,但是我如何将它与scatterplot3d结合使用呢
发布于 2017-11-24 23:51:54
我不确定这是不是可能的。根据软件包文档,“一些par参数在这里不适用,例如,许多用于轴计算的参数。”
可以通过调整刻度线标签来实现,如Scatterplot3d包的作者提供的答案所示,但这并不会移动实际的点。http://r.789695.n4.nabble.com/scatterplot3d-customise-axes-td4554528.html
最后,我发现这些类型的显示很难解释。考虑一下格子图方法。
https://stackoverflow.com/questions/47476279
复制相似问题