ggplot2中的图形传说

Question

我很难重新命名我的人物传奇。当我尝试使用scale_color_discrete进行此操作时，图例在图上重复：

​

这是我使用过的代码：

    Scoping <- read.csv("Data/scoping.csv")

#Enzyme column must be turned into a factor
Scoping$Enzyme <- as.factor(Scoping$Enzyme)
#Creating scatterplot called scopplt
scopplt <- ggplot(Scoping,aes(x=Time,y=PNP,shape=Enzyme, color=Enzyme))+
  geom_point(size=2)+
  theme_classic()+
  scale_y_continuous(limits=c(0,120), breaks = c(0,30,60,90,120), name = "[PNP] µM")+
  scale_x_continuous(limits=c(0,12), breaks = c(0,2,4,6,8,10,12), name = "Time (min)")+
  theme(legend.position = c(0.2, 0.6))
  
scopplt
# Adding linear regression
scopplt+geom_smooth(method=lm,se=FALSE,fullrange=TRUE,
                     aes(color=Enzyme)) +
  scale_color_discrete(name= "[Enzyme] µM")

有人知道为什么会这样吗。谢谢。

Answer 1

据我所知，您之所以调用scale_color_discrete，是因为您试图重命名该传奇。如果这确实是你试图用这条线做的事情，那么你就采取了错误的方法。问题是你通过酶改变了点的颜色和形状，而scale_color_discrete只适用于颜色。要改变传说标题，你可以做杜恩布兰德建议的事，让ggplot知道你想要的颜色和形状相同的标题，从而把这两个传说放在一起。或者您也可以用scale_color_discrete(name = "[Enzyme] µM")替换labs(color = "[Enzyme] µM", shape = "[Enzyme] µM")。我的直觉告诉我，应该有一个更简单的方法来做这件事，但我无法在这个时候弄清楚。