R/get_stats.R

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

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

  dta <- iextrader_api(url)

  return(dta)
}