Importando os dados da ação PETR3.SA do Yahoo Finance.
library(quantmod)
options("getSymbols.warning4.0"= FALSE)
getSymbols("PETR3.SA")
head(PETR3.SA)
## PETR3.SA.Open PETR3.SA.High PETR3.SA.Low PETR3.SA.Close
## 2007-01-01 54.49 54.49 54.49 54.49
## 2007-01-02 54.59 55.75 54.59 55.75
## 2007-01-03 55.00 55.60 53.09 53.60
## 2007-01-04 53.40 53.50 51.90 52.00
## 2007-01-05 51.89 52.40 50.42 51.00
## 2007-01-08 51.30 52.06 50.81 51.30
## PETR3.SA.Volume PETR3.SA.Adjusted
## 2007-01-01 0 24.99
## 2007-01-02 1452400 25.57
## 2007-01-03 6621800 24.58
## 2007-01-04 6531000 23.85
## 2007-01-05 4991000 23.39
## 2007-01-08 5008600 23.53
tail(PETR3.SA)
## PETR3.SA.Open PETR3.SA.High PETR3.SA.Low PETR3.SA.Close
## 2015-03-23 9.17 9.32 9.05 9.22
## 2015-03-24 9.17 9.33 9.07 9.24
## 2015-03-25 9.30 9.78 9.30 9.72
## 2015-03-26 9.81 9.85 9.20 9.23
## 2015-03-27 9.20 9.47 9.05 9.22
## 2015-03-30 9.38 9.62 9.30 9.59
## PETR3.SA.Volume PETR3.SA.Adjusted
## 2015-03-23 9743000 9.22
## 2015-03-24 9696700 9.24
## 2015-03-25 31091600 9.72
## 2015-03-26 21363700 9.23
## 2015-03-27 14203300 9.22
## 2015-03-30 11144500 9.59
PrecoFech <- PETR3.SA[,"PETR3.SA.Close"]
Volume <- PETR3.SA[,"PETR3.SA.Volume"]