使用R中的quantmod计算特定时期的最高价格

我试图计算一只股票在过去144天内的最高价格和最低价格

我已经思考了一段时间，最后我得出了以下两个结论 意思是说，但这些仍然不是我想要的

这是因为最高价格（高价格，144）和最低价格（低价格，144）是一个可能随时间变化的系列

data <- getSymbols("300343.SZ",auto.assign=FALSE)

#highest price so far
seriesHi(data)

# find the maximum highest price each week
max_price_weekly <- period.apply(data,endpoints(data,on='weeks'), FUN=function(x) { max(Hi(x)) } ) 

candleChart(data,subset='2012::2013')

---

data如果您只想获得过去144天的最高或最低价格，您可以这样做

runMax(Hi(data), 144)
runMin(Lo(data), 144)