2016-10-08 20 views
0

XTSプロットで最も右の観測値を追加する方法はありますか?別の言葉では、私は何とか最近の観測結果をグラフに表示したいのです。XTSプロットの最後の観測

好ましくは軸上の数字ですか?または水平な水平線。そして、あなたは、プロットのタイトルの最新の値を示すことができ

+1

(http://stackoverflow.com/questions/5963269/how-to-make-a-great-r [Rにおける最小の再現例を提供する方法]お読みください:例えば-reproducible-example#answer-5963610)。それに応じて編集して改善してください。 – lukeA

+1

数字を表示するには、水平線に 'text'を使用します。これらの関数に渡すための正しい座標を見つけるのに困っていますか?その後、詳しく説明してください。 –

答えて

2

(左上隅)、およびそれのための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 

enter image description here

迅速かつ汚いアプローチあなたはパッケージquantmodでプロットすることができることを知っていますか?デフォルトでは、最新の値が「すぐに」表示されます。関数chartSeriesを使用し、addTAを使用できます。チャートの左上隅に最新の値が表示されます。

chartSeries(Cl(AAPL["2016"])) 
addTA(RSI(Cl(AAPL["2016"]))) 

enter image description here

関連する問題