Несоответствие цвета с использованием rgl

Question

Я использую 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) 

Answer 1

Это почти наверняка связано с 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]