r - 如何在 plot.xts 中设置“lwd”参数？

Question

我只想将我正在绘制的线的线宽设置为某个值。其余部分（网格线、图形边框）应保持 1.0 的宽度。

但是，如果我设置par(lwd=2)所有线条都更宽。如果我设置plot.xts(AAPL,lwd=2)，我会得到一个错误：

Error in axis(1, at = xycoords$x[ep], labels = names(ep), las = 1, lwd = 1,  : 
  formal argument "lwd" matched by multiple actual arguments

这是我的代码：

library(quantmod)
getSymbols("AAPL")
par(lwd=2)
plot.xts(AAPL)

Answer 1

我对此的解决方案通过type='n'然后调用lines：

require(quantmod)
getSymbols('CPIAUCSL',src='FRED')
xts::plot.xts(CPIAUCSL, type='n')
lines(CPIAUCSL, lwd=3, col='darkgoldenrod')

这不需要xtsExtra软件包，它会进行其他更改并且（可能）没有被积极维护。（至少它今天没有通过包管理器安装在 R 3.1.1 上。）

Answer 2

尝试xtsExtra从 R-Forge 使用。它对绘制 xts 对象有很多增强。

install.packages("xtsExtra", repos="http://R-Forge.R-project.org")

您可以使用

library(xtsExtra)

getSymbols("AAPL")

plot.xts(AAPL[,4], lwd = 2)

那会给你