我试图在黑白散点图上绘制三个趋势线。这是我正在使用的代码:
BlackWhite<-ggplot(plot.hg,aes(x=ToeArchTemp,y=DF..N.,group=Condition,colour=Condition))
+geom_point(aes(shape=Condition,color=Condition),size=2)
+geom_smooth(method="lm",se=FALSE)
+scale_shape_manual(values=c(16, 1, 3))
+scale_color_manual(values=c("black","black","black"))
+theme_bw()+scale_linetype_manual(values=c("solid","dotted","twodash"))
+scale_size_manual(values=c(1,1.5,1))
这三行都显示为黑色实线-我在做什么错了?