我正在使用rgl从导入的.csv数据集创建点的散点图。我喜欢这些点的颜色是在数据集中设置的。一切正常,但是当显示散点图时,点的颜色与数据中定义的颜色不匹配。例如,指定为"蓝色"的所有点。可能实际上是绿色的,所有的点都指定为"黄色"实际上可能会出现红色。
data=read.csv("ExpLayout.csv", header = TRUE)
x=data$x
y=data$y
z=data$z
color=data$color
plot3d(x=x, y=y, z=z, type="s", col=color)
答案 0 :(得分:4)
这几乎可以肯定是由于read.csv
将字符串转换为因子
请参阅此可重现示例中的差异
library(rgl)
x<-1:5
y=1:5
z <- 1:5
colors <- c('red','green','blue','orange','purple')
plot3d(x=x,y=y,z=z,col=colors, type = 's')
colorsf <- factor(c('red','green','blue','orange','purple'))
plot3d(x=x,y=y,z=z,col=colorsf, type = 's')
因此,要么使用color
将stringsAsFactors=FALSE
作为字符列读取,要么使用as.character()
或levels(colors)[colors]
强制转换为字符