R/get_financials.R

In JestonBlu/IEXTrader: Interface for the IEXtrading.com open API web service

#' Get Financials from IEXTrader
#'
#' @param ticker (string) single stock ticker
#' @import magrittr curl jsonlite
#' @export
get_financials = function(ticker) {
  url <- paste(iextrader_endpoints("financials"), sep = "")
  url <- gsub("'stock'", ticker, url)

  dta <- iextrader_api(url)
  dta <- dta$financials

  dta$ticker <- ticker

  return(dta)
}