Dados

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"]