Proyecto Trading

Instalamos los paquetes necesarios

Para el trabajo necesitamos escoger la fecha que vamos a usar y para esto utilizaremos el formato aƱo mes dia. Decidimos que nuestro trabajo estara enfocado a una estrategia en corto plazo por lo que nuestra ventana de tiempo sera desde enero del presente aƱo

fecha_inicio= "2022-01-03"
fecha_final= "2022-05-04"

Usamos el comando getSymbols para importar los precios con el Ticker con el que se encuentra en Yahoo Finance. Teniendo en cuenta la nomenclatura si necesitaramos un indice tendriams que agregar ^ previo al ticker y para una acción bastaria con solamente el ticker

precios= getSymbols("AAPL",src= "yahoo", from= fecha_inicio, to= fecha_final, periodicity= "daily") 

En este caso decidimos trabajr con los datos de Apple y los datos encontrados serian los siguientes

head(AAPL)
##            AAPL.Open AAPL.High AAPL.Low AAPL.Close AAPL.Volume AAPL.Adjusted
## 2022-01-03    177.83    182.88   177.71     182.01   104487900      181.5117
## 2022-01-04    182.63    182.94   179.12     179.70    99310400      179.2080
## 2022-01-05    179.61    180.17   174.64     174.92    94537600      174.4411
## 2022-01-06    172.70    175.30   171.64     172.00    96904000      171.5291
## 2022-01-07    172.89    174.14   171.03     172.17    86709100      171.6987
## 2022-01-10    169.08    172.50   168.17     172.19   106765600      171.7186

Ahora vamos a graficar los datos, para esto urilizaremos la grafica predeterminada, donde existe la función ROC para rendimientos simples y logaritmicos

chartSeries(AAPL, type = "candlesticks", subset= "last 4 months", theme = chartTheme("black"), name= "Grafico de velas")

addROC(n=10)