r语言绘图

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

> x=data.frame(num,x1,x2,x3)
> x
          num x1 x2  x3
1   201412001 89 83  74
2   201412002 85 66  77
3   201412003 93 81  86
4   201412004 87 90  85
5   201412005 87 77  95
6   201412006 95 76  89
7   201412007 84 87  96
8   201412008 98 84  92
9   201412009 83 83  82
10  201412010 89 69  94
11  201412011 84 82  96
12  201412012 95 82 100
13  201412013 97 81  84
14  201412014 90 89  88
15  201412015 91 83  91
16  201412016 81 75  86
17  201412017 81 88  81
18  201412018 81 79  81
19  201412019 98 87  87
20  201412020 81 89  76
请问如何在一张图上画出三条线，都是以num为横坐标，分别以x1，x2，x3的值为纵坐标？

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：R语言 Frame Fram Data NUM

1. library(ggplot2)
   
2. x$num<-as.numeric(x$num)
   
3. ggplot(data=x,aes(x=num))+
   
4.   geom_point(aes(y=x1,color="x1"))+
   
5.   geom_line(aes(y=x1,color="x1"))+
   
6.   geom_point(aes(y=x2,color="x2"))+
   
7.   geom_line(aes(y=x2,color="x2"))+
   
8.   geom_point(aes(y=x3,color="x3"))+
   
9.   geom_line(aes(y=x3,color="x3"))+
   
10.   labs(x="your x label",y="your y label")+
    
11.   guides(color=guide_legend(title=NULL))

复制代码

或如果你的num是factor型的

1. library(tidyr)
   
2. library(dplyr)
   
3. library(ggplot2)
   
4. xx<-gather(x,key="x",value = y,x1:x3)
   
5. ggplot(xx,aes(x=num,y=y,color=x,group=x))+geom_point()+geom_line()

复制代码

谢谢啦哈哈

请问为啥color=x1，x2，x3？我写成
ggplot(data=x,aes(x=num))+geom_point(aes(y=x1,color="red"))+geom_line(aes(y=x1,color="red"))+
geom_point(aes(y=x2,color="green"))+geom_line(aes(y=x2,color="green"))+
+ geom_point(aes(y=x3,color="yellow"))+geom_line(aes(y=x3,color="yelow"))+
+ labs(x="学号",y="各科成绩")为啥颜色名字和图形不对应呀？
guides(color=guide_legend(title=NULL))这个设置图例看不懂啊？

注释掉那句，看看效果

不对应就要修改图例了，效果一样