将R

时间:2019-04-18 16:31:58

标签: r graph

我正在尝试在R中绘制数据,我想按月显示数据。绘制时,X轴每年折断一次,尽管数据仅为3年,但X轴折断为2015、2015.5、2016等。如何更改X轴图以将其反映为2015年1月,2015年3月,2015年5月...等等。

数据

时间段实际通话量

2015年8月1日69676

9/1/2015 71827

2015年10月1日62504

11/1/2015 59431

2015年12月1日63304

1/1/2016 58899

2/1/2016 55922

3/1/2016 60463

2016/4/1 56121

5/1/2016 58574

2016年6月1日64467

2016年7月1日61825

2016年8月1日75784

9/1/2016 67047

2016年10月1日63000

11/1/2016 63318

12/1/2016 66612

1/1/2017 71614

2/1/2017 62875

3/1/2017 66297

4/1/2017 66193

5/1/2017 70143

6/1/2017 72259

2017年7月1日65793

8/1/2017 53687

9/1/2017 48518

10/1/2017 58740

11/1/2017 50801

12/1/2017 44293

1/1/2018 61150

2/1/2018 49619

3/1/2018 49621

4/1/2018 48645

5/1/2018 37958

6/1/2018 37725

7/1/2018 42221

8/1/2018 41663

9/1/2018 35328

10/1/2018 37687

11/1/2018 31657

12/1/2018 26390

1/1/2019 27542

2/1/2019 23262

1 个答案:

答案 0 :(得分:1)

我认为您应该听从上面的评论。 看来您不是Stackoverflow的新手,它可能会帮助您入门时玩点什么。

我喜欢用 ggplot 绘制这些东西,而ggplot需要一个数据框进行绘制。

date <- as.Date(c('8/1/2015', '9/1/2015', '10/1/2015',
              '11/1/2015', '12/1/2015', '1/1/2016'),
            format = "%m/%d/%Y")

value <- c('69676', '71827', '62504',
           '59431', '63304', '58899')
df <- data.frame(date, value)

在ggplot中,您可以使用数据框 df ,定义一些美观的 aes ,这有助于创建轴,然后可以非常舒适的方式定义轴文本的格式

library(ggplot2)
ggplot(df, aes(date, value))+
  geom_point()+
  scale_x_date(date_labels = "%b %Y")

enter image description here

如果要使用基本图,

@ user1945827会指出一些要阅读的内容。因为我最喜欢的绘图库是 ggplot ,所以我想引用thisthis