向plot.xts添加字幕

Question

有没有办法在plot.xts中添加像基本图中那样的字幕？

plot(xts(rnorm(100), order.by = as.Date(1:100)), sub = "Subtitle")
plot(rnorm(100), sub = "Subtitle", type = "l")

Answer 1

您似乎可以在 xts 对象上使用plot.zoo 并让副标题（以及与此相关的x 标签）显示在绘图的底部。根据我的实验，这似乎是绘图中日期标签和边距设置的问题。xts 默认剪切 x 标签和副标题（默认情况下显示在绘图底部）。

我正在 DataCamp 上一门关于时间序列可视化和此处显示的内容的课程

https://rpubs.com/odenipinedo/visualizing-time-series-data-in-R

似乎在示例图中演示了成功的字幕显示，但在进行课程的代码练习时，我无法重现它，尽管课程的自动评分器认为我的代码是正确的……我正在尝试联系讲师班主任阿诺·阿姆塞勒姆 (Arnaud Amsellem) 询问此事。抱歉无法提供更好的解决方案...