r - 两个时间序列 - 看起来相似但情节不同
问题描述
我已经合并了两个系列以使用 ggplot2 进行绘图,但第二个系列绘制为一个区域而不是一条线。我的输入是一个 tibble,它暗示了一些关于数据的东西。我已将 xts 系列合并为一个小标题,当我绘制它时,第一个系列显示为一条线,第二个显示为一个区域。我不明白为什么。这两个系列的大小相似。红色区域的顶部大约适合第二个系列。这是输入数据框的摘要
> summary(us_cdn_xts)
Index us10y2y cdn10y2y
Min. :2004-01-01 Min. :-0.190 Min. :-0.1400
1st Qu.:2007-09-13 1st Qu.: 0.770 1st Qu.: 0.0000
Median :2011-05-26 Median : 1.460 Median : 0.6500
Mean :2011-05-26 Mean : 1.401 Mean : 0.6949
3rd Qu.:2015-02-05 3rd Qu.: 2.120 3rd Qu.: 1.2200
Max. :2018-10-18 Max. : 2.910 Max. : 2.3200
NA's :1700 NA's :159
>
代码如下
> plot_data<-tidy(us_cdn_xts)
> print(plot_data)
# A tibble: 10,810 x 3
index series value
<date> <chr> <dbl>
1 2004-01-01 us10y2y NA
2 2004-01-02 us10y2y 2.44
3 2004-01-03 us10y2y NA
4 2004-01-04 us10y2y NA
5 2004-01-05 us10y2y 2.46
6 2004-01-06 us10y2y 2.45
7 2004-01-07 us10y2y 2.43
8 2004-01-08 us10y2y 2.42
9 2004-01-09 us10y2y 2.43
10 2004-01-10 us10y2y NA
# ... with 10,800 more rows
> library(ggthemes)
> term_plot<-ggplot(plot_data,aes(x=index,y=value,colour=series))+
+ geom_line()
> ggsave(term_plot,file="term_plot.png")
Saving 7 x 7 in image
Warning message:
Removed 3 rows containing missing values (geom_path).
>
解决方案
推荐阅读
- ios - 未调用云锚委托方法
- haskell - Haskell中的递归配对列表搜索
- java - 没有root权限无法在android上运行iperf3
- c - 我的代码在 C 中看不到 while 循环(带有 getchar 函数)
- ansible - 在 Ansible Playbook 中通过标签或过滤器包含角色的任务
- java - Eclipse:文件>团队>共享项目按钮被禁用
- mysql - 无法使用 Docker 使用 PHPUnit - SQLSTATE[HY000] [2002] (PhpStorm 2019.2)
- java - XSSFCell -> 如何从 long 中获取间隔时间值
- python - 如何修复:AttributeError:模块“整洁”没有属性“配置”
- android - 将增强现实和 3D 对象实施到移动应用程序中,