0
XTSプロットで最も右の観測値を追加する方法はありますか?別の言葉では、私は何とか最近の観測結果をグラフに表示したいのです。XTSプロットの最後の観測
好ましくは軸上の数字ですか?または水平な水平線。そして、あなたは、プロットのタイトルの最新の値を示すことができ
XTSプロットで最も右の観測値を追加する方法はありますか?別の言葉では、私は何とか最近の観測結果をグラフに表示したいのです。XTSプロットの最後の観測
好ましくは軸上の数字ですか?または水平な水平線。そして、あなたは、プロットのタイトルの最新の値を示すことができ
(左上隅)、およびそれのためのXTSチャート上のラインをマーク:
# If you don't already have it, use latest version of xts for nicer plot.xts, which this code uses:
# devtools::install_github("joshuaulrich/xts")
# Sample data:
library(quantmod)
getSymbols("AAPL")
data <- AAPL["2016"]
# Solve the question:
lastval <- last(Cl(data))
plot(Cl(data), main = paste("latest value = ", round(lastval, 2)))
lines(xts(rep(lastval, NROW(data)), index(data)), on = 1, col = "red", lty = 2, main = "hi")
# Check we are we plotting the xts last value? (right most value)
> last(Cl(data))
AAPL.Close
2016-10-07 114.06
迅速かつ汚いアプローチあなたはパッケージquantmod
でプロットすることができることを知っていますか?デフォルトでは、最新の値が「すぐに」表示されます。関数chartSeries
を使用し、addTA
を使用できます。チャートの左上隅に最新の値が表示されます。
chartSeries(Cl(AAPL["2016"]))
addTA(RSI(Cl(AAPL["2016"])))
(http://stackoverflow.com/questions/5963269/how-to-make-a-great-r [Rにおける最小の再現例を提供する方法]お読みください:例えば-reproducible-example#answer-5963610)。それに応じて編集して改善してください。 – lukeA
数字を表示するには、水平線に 'text'を使用します。これらの関数に渡すための正しい座標を見つけるのに困っていますか?その後、詳しく説明してください。 –