R/data_prep.R

In threadingdata/finnhubr: Integration with Finnhub.io API

# moving_average_codes <- readr::read_csv('docs/finnhub-moving-average-codes.csv')
# usethis::use_data(moving_average_codes)
# 
# technical_indicator_codes <- readr::read_csv('docs/finnhub-technical-indicator-codes.csv') %>% 
#   purrr::set_names(c('technical_indicator', 'description', 'arguments', 'response_attributes', 'example'))
# usethis::use_data(technical_indicator_codes)
# 
# supported_stock_exchanges <- readr::read_csv('docs/finnhub_exchanges.csv') %>% 
#   dplyr::rename(exchange = code)
# supported_stock_exchanges
# usethis::use_data(supported_stock_exchanges, overwrite = TRUE)
# 
# supported_indices <- readr::read_csv('docs/finnhub_supported_indicies.csv') %>% 
#   dplyr::rename(index = symbol)
# usethis::use_data(supported_indices)