# \donttest{
library(lubridate)
library(rlang)
library(httr2)
library(dplyr)
library(stringr)
symbols <- c("BiCc","XOM","SlbC")
data_tbl <- BRVM_get1(ticker = symbols)
data_tbl
#From three year ago to the present
BRVM_get1("ALL INDEXES", from = Sys.Date() - 252*3, to = Sys.Date())
BRVM_get1(ticker = "BRVMAG", from = "2010-01-04", to = "2022-01-04")
BRVM_get1("ALL", Period = 0, from = "2010-01-04", to = "2022-01-04" ) #To get daily data
BRVM_get1("BrvmAS", Period = 1 ) # To get daily data for a whole year
BRVM_get1(c("BRVMPR", "BRVMAG"), Period = 5) # To get weekly data
BRVM_get1("BRVMAG", Period = 30 ) # To get monthly data
BRVM_get1("BRVMPR", Period = 91 ) # To get quaterly data
BRVM_get1(c("brvmtr", "BiCc", "BOAS"), Period = 365 ) # To get yearly data
# }
Run the code above in your browser using DataLab