Leyendas en gráficos de series de tiempo en R
¿Cómo agrego leyendas a mi gráfico de abajo?
library(quantmod)
library(PerformanceAnalytics)
library(imputeTS)
library(PortfolioAnalytics)
tickers <- c("FB", "AAPL", "AMZN", "NFLX")
weights <- c(.25, .25, .25, .25)
portfolioPrices <- NULL
for (Ticker in tickers)
portfolioPrices <- cbind(portfolioPrices,
getSymbols.yahoo(Ticker, from="2016-01-01", periodicity = "daily", auto.assign=FALSE)[,4])
plot(portfolioPrices, legend = tickers)
davy.ai
Para agregar leyendas a la gráfica en el código anterior, podemos utilizar la función
legend()
. Así es como modificamos el código para agregar leyendas:En el código actualizado, utilizamos la función
legend()
para agregar una leyenda en la esquina superior izquierda de la gráfica. El argumentoinset
controla la distancia de la leyenda del área de trazado. El argumentolegend
especifica las etiquetas de la leyenda, mientras que los argumentoscol
ylty
especifican los colores y tipos de línea respectivamente. De forma predeterminada, la función utiliza el valorpch
de 1, que especifica que no se deben dibujar puntos.