R 使用ggplot打印数据

R 使用ggplot打印数据,r,ggplot2,R,Ggplot2,我试图用黑色线条的图例来绘制我的数据,但我不知道如何才能使“MYLINE”显示在MY2的右侧?以及如何控制该生产线的颜色和性能,例如颜色、厚度等 MY1_DIS_REF$METHOD <- "MY1" MY1_plot<-MY1_DIS_REF[,-c(5,6,7)] MY2_DIS_REF$METHOD <- "MY2" MY2_plot<-MY2_DIS_REF[,-c(5,6,7)] MY1andMY2_PLOT <-

我试图用黑色线条的图例来绘制我的数据,但我不知道如何才能使“MYLINE”显示在MY2的右侧?以及如何控制该生产线的颜色和性能,例如颜色、厚度等

MY1_DIS_REF$METHOD <- "MY1"
MY1_plot<-MY1_DIS_REF[,-c(5,6,7)]
MY2_DIS_REF$METHOD <- "MY2"
MY2_plot<-MY2_DIS_REF[,-c(5,6,7)]
MY1andMY2_PLOT <- rbind(MY1_plot,MY2_plot)

ggplot()+
  geom_point(data=MY1andMY2_PLOT,aes(X,Y,color=METHOD),alpha=0.5)+
  geom_path(data=line,aes(V1,V2,group=B1,),size=1)+
  xlab("X")+
  ylab("Y")+
  facet_wrap(~B1,scales = "free")+
  theme_bw()+coord_flip()

MY1_DIS_REF$方法您可以使用不同于当前图例使用的美学方法为线条添加单独的图例:

ggplot()+
  geom_point(data=MY1andMY2_PLOT,aes(X,Y,color=METHOD),alpha=0.5)+
  geom_path(data=line,aes(V1,V2, group=B1, linetype = "Myline"), size=1)+
  xlab("X")+
  ylab("Y")+
  facet_wrap(~B1,scales = "free")+
  theme_bw()+coord_flip()

您可以使用美学之外的参数更改其他美学,例如厚度由
大小控制

ggplot()+
  geom_point(data=MY1andMY2_PLOT,aes(X,Y,color=METHOD),alpha=0.5)+
  geom_path(data=line,aes(V1,V2, group=B1, linetype = "Myline"), size=3)+
  xlab("X")+
  ylab("Y")+
  facet_wrap(~B1,scales = "free")+
  theme_bw()+coord_flip()

您可以通过编辑颜色比例来更改颜色(默认为红色和蓝色):

编辑:更改线条颜色:

ggplot()+
  geom_point(data=MY1andMY2_PLOT,aes(X,Y,color=METHOD),alpha=0.5)+
  geom_path(data=line,aes(V1,V2, group=B1, linetype = "Myline"), size=3, colour = "blue") +
  xlab("X")+
  ylab("Y")+
  facet_wrap(~B1,scales = "free")+
  theme_bw()+coord_flip()

如果您还想重命名图例,可以执行以下操作:

ggplot()+
  geom_point(data=MY1andMY2_PLOT,aes(X,Y,color=METHOD),alpha=0.5)+
  geom_path(data=line,aes(V1,V2, group = B1, linetype = "MyLine"), size=3, colour = "blue") +
  labs(x = "X", y = "Y", linetype = "DESIRED_LINETYPE_NAME", color = "DESIRED_COLOR_NAME")+
  facet_wrap(~B1,scales = "free")+
  theme_bw()+coord_flip()

尝试将aes(color=“MYLINE”)添加到
geom_路径()中
call。您也可以编辑类似的其他属性,例如
size=3
@g\T谢谢您,但现在图例中的点上画了一条线,如图所示:还有如何设置每个点的颜色?现在变为红绿色和蓝色是随机的吗?您可以共享一段数据以便我们可以帮助您更轻松地完成吗?我无法复制您的绘图…请复制并粘贴
dput(MY1_DIS_REF)
dput(MY2_DIS_REF)
的输出到您的问题中。@Rodolfoksviega您可以在这个链接中找到MY1和MY2_的绘图和线条谢谢。是否可以更改线条的颜色?并将图例名称从“线型”更改为其他名称?我猜设置
geom_路径(数据=行,aes(V1,V2,group=B1,DESIRED_NAME=“Myline”,color=“DESIRED_color”)
将执行以下操作trick@rodolfoksveiga当我这样做的时候,“Myline”图例永远不会出现。有什么建议吗?““Myline”是您在图例中想要称为您的线条的任何东西。检查绘图中的图例,您将看到黑色线条的名称是“Myline”“@Rodolfoksviega我理解,但当我这样做时,
geom\u路径(data=line,aes(V1,V2,group=B1,DESIRED\u NAME=“Myline”,color=“DESIRED\u color”)
图例中没有显示任何内容
ggplot()+
  geom_point(data=MY1andMY2_PLOT,aes(X,Y,color=METHOD),alpha=0.5)+
  geom_path(data=line,aes(V1,V2, group = B1, linetype = "MyLine"), size=3, colour = "blue") +
  labs(x = "X", y = "Y", linetype = "DESIRED_LINETYPE_NAME", color = "DESIRED_COLOR_NAME")+
  facet_wrap(~B1,scales = "free")+
  theme_bw()+coord_flip()