Не очень повезло, извини.Я бы предложил построить свой собственный сюжет, например,
plot(index(df), df[,1], type = "p", ylab = "", xlab = "",
ylim = range(df[,1:3]), main = "Title")
axis(1, at=round(unique(df[,1:3]), 0))
grid()
segments (x0=index(df), y0=df[,2],
x1=index(df), y1=df[,3])
lines(index(df), df[,1], lwd = 2)
plot.xts
- это просто plot
, но с некоторыми дополнениями, которые могут быть воспроизведены, хотя и не точно
, или еслиВы хотите сделать его более модным, посмотрите ggplot2
пакет, множество учебных пособий онлайн