scale_color_manual не распознается в коде - PullRequest
0 голосов
/ 27 января 2019

Я создал график NMDS в R и хочу, чтобы группы данных имели цветовую кодировку с определенными цветами, которые я определяю вручную в соответствии с каждым кластером.Я указал столбец для раскраски как: color=Toxics2$Cluster.Я добавил код для scale_color_manual в конце со значениями цвета, которые я хочу.Когда я запускаю код, он окрашивает каждый кластер в цвета по умолчанию, независимо от того, сколько раз я проверяю код и запускаю его.Кто-нибудь может понять, почему код scale_color_manual не работает для меня?

ggplot(mds,aes(x=MDS1,y=MDS2)) +  
geom_point(size=0) +
geom_text(aes(label=Toxics2$Toxic),size=4,color=as.factor(Toxics2$Cluster) +
 geom_segment(data=toxicvector.df,aes(x=0,xend=MDS1*0.05,y=0,yend=MDS2*0.05),  arrow = arrow(length = unit(0.2, "cm")),colour="red", size=1,  inherit.aes=FALSE) +
 geom_text(data=toxicvector.df,aes(x=MDS1*0.05,y=MDS2*0.05,label=properties),size=4,colour="dark blue",    inherit.aes=FALSE) +
 ggtitle("NMDS Plot of Toxic Pollutant Chemical Characteristics") + 
 scale_color_manual(values=c('1'="#1B9E77",'2'="#D95F02",'3'="#7570B3",'4'="#E7298A"))
...