r - 如何使用 R 仅在散点图 3d 图中更改点颜色?
问题描述
我尝试使用 R 将 scatter3d 图中的点颜色更改为黑色,但失败了。由于点的颜色和表面颜色重叠,因此很难查看数据。
我能得到一些想法吗?
# scatter plot with regression plane
scatter3D(x, y, z, pch = 16, cex = 1, alpha.col = 0.8, color="black", col = ramp.col(c("dark green", "khaki", "dark red")), bty="b2",
theta = 595, phi = 35, ticktype = "detailed", d=200,
xlab = "", ylab = "", zlab = "",
surf = list(x = x.pred, y = y.pred, z = z.pred,
facets=T, border="black"), main = "Room A")
谢谢!
解决方案
您可以按照您的命令使用points3D
并包含add=TRUE
.
# scatter plot with regression plane
scatter3D(x, y, z,
col = ramp.col(c("dark green", "khaki", "dark red")), bty="b2",
theta = 595, phi = 35, ticktype = "detailed", d=200,
xlab = "", ylab = "", zlab = "",
surf = list(x = x.pred, y = y.pred, z = z.pred,
facets=T, border="black"), main = "Room A")
points3D(x, y, z, pch = 16, color="black", alpha = 0.8, add=TRUE)
推荐阅读
- sql - 具有多个值的 REGEXP_INSTR
- javascript - ios safari XMLHttpRequest jsonp 404
- android - 在代码中,lambda的类型不匹配,它是如何工作的?
- firebase - Flutter 为用户添加角色类型
- python - mypy:缺少位置参数
- c++ - 物体碰撞OpenGL
- python - 我的尝试有什么问题,除了?我没有得到任何打印,也没有错误
- python - 在 python 表达式中为子表达式起别名
- django - 在查询循环中显示 ManytoManyField 元素
- python - 有没有办法在熊猫中使用 groupby/pivot 表来实现这一点?