有没有办法让 quantmod 绘制方形折线图？
我已经尝试修改我的时间序列，以便每个数据点在下一个数据点之前一秒复制（希望这将近似于一条方形线），但 quantmod 似乎在 x 轴上按顺序和均匀间隔数据而不考虑实际值x （即一个点和下一个点之间的水平空间是相同的，无论 delta-T 是 1 秒还是 1 分钟）。
我想我可以将我的时间序列从稀疏转换为密集（每秒一个条目，而不是每个值变化一个条目），但这似乎非常笨拙，应该是不必要的。
我正在构建我的时间序列：
library(quantmod)
myNumericVector <- c(3,7,2,9,4)
myDateTimeStrings <- paste("2011-10-31", c("5:26:00", "5:26:10", "5:26:40", "5:26:50", "5:27:00"))
myXts <- xts(myNumericVector, order.by=as.POSIXct(myDateTimeStrings))
并像这样绘制图表：
chartSeries(myXts, type="line", show.grid="true", theme=chartTheme("black"))
为了说明我所拥有的与我想要的，结果看起来像下面的蓝线，但我想要更像绿色的东西：
此外，出于好奇，这里是复制时间序列中的点的代码，使得一个值和下一个值之间的差距尽可能小：
mySquareDateTimes <- rep(as.POSIXct(myDateTimeStrings),2)[-1]
mySquareDateTimes[seq(2,8,by=2)] <- mySquareDateTimes[seq(2,8,by=2)] - 1
mySquareXts <- xts(rep(myNumericVector,each=2)[-10], order.by=mySquareDateTimes)
chartSeries(mySquareXts, type="line", show.grid="true", theme=chartTheme("black"))
结果不太理想。