plot.xts() always colors the histogram green/red when the series is above/below zero, regardless of col specified by the user.
Minimal, reproducible example
library(xts)
data(sample_matrix)
x <- as.xts(sample_matrix, dateFormat="Date")
layout(matrix(1:2, 2, 1))
plot(x[,4], type = "h", col = "grey")
plot(coredata(x[,4]), type = "h", col = "grey")
Description
plot.xts()
always colors the histogram green/red when the series is above/below zero, regardless ofcol
specified by the user.Minimal, reproducible example