R/prices.R

prices <- function(ativo) {
  library(quantmod)
  quantmod::getSymbols(ativo)
  pr<-get(ativo)[,1:4]
  names(pr)<-c("open","high","low","close")
  return(pr)
}
eduardo-camilo/QuantCandles documentation built on May 23, 2019, 1:11 p.m.