如何画折线图

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

请问

我有个数据，想要按school的不同，画5个折线图，应该这么写啊

就想做成如下这样的图





data.xls (32.5 KB)

2017-11-13 16:52:06 上传

data

扫码加我 拉你入群

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

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

分享0 收藏2 回帖

关键词：折线图 school CHOO CHO

就是这样的数据

1. library(tidyverse)
   
2. data %>%
   
3.   ggplot(aes(x = time, y = num)) +
   
4.   geom_line(aes(color = school))

复制代码

cheetahfly 发表于 2017-11-13 21:25

这个不是平衡数据，好像报错了，

1. data %>%
   
2. +   ggplot(aes(x=time,y=num)) %>%
   
3. +   geom_line(aes(color=school))
   
4. Error: ggplot2 doesn't know how to deal with data of class uneval

复制代码

cheetahfly 发表于 2017-11-13 21:25

你好，这个报错啊

> library(readxl)
Warning message:
程辑包‘readxl’是用R版本3.3.3 来建造的
> data <- read_excel("C:/Users/gongyu/Desktop/new/data.xls")
> View(data)
> data %>%
+   ggplot(aes(x = time, y = num)) +
+   geom_line(aes(color = school))
Error: could not find function "%>%"

gongyuoo 发表于 2017-11-14 09:18
你好，这个报错啊

> library(readxl)

是我的包不好使。。。。

我有一种笨笨的方法
首先用apply把数据按学校求和
apply(data,1,FUN=sum)
然后再用lines(x,y,type="b")分别画出每一个学校的折线图

慕目穆木 发表于 2017-11-14 10:55
我有一种笨笨的方法
首先用apply把数据按学校求和
apply(data,1,FUN=sum)

抱歉，我才学R，能不能写全点啊