binance: Wrapper for Binance API

FIAT <- c(
  "AED",
  "AMD",
  "ARS",
  "AUD",
  "BDT",
  "BGN",
  "BHD",
  "BND",
  "BOB",
  "BRL",
  "CAD",
  "CHF",
  "CLP",
  "CNY",
  "COP",
  "CRC",
  "CZK",
  "DOP",
  "DZD",
  "EGP",
  "EUR",
  "GBP",
  "GEL",
  "GHS",
  "GTQ",
  "HKD",
  "HNL",
  "HUF",
  "IDR",
  "ILS",
  "INR",
  "JOD",
  "JPY",
  "KES",
  "KHR",
  "KWD",
  "KZT",
  "LAK",
  "LBP",
  "LKR",
  "MAD",
  "MDL",
  "MMK",
  "MNT",
  "MXN",
  "NGN",
  "NIO",
  "NPR",
  "NZD",
  "OMR",
  "PAB",
  "PEN",
  "PHP",
  "PKR",
  "PLN",
  "PYG",
  "QAR",
  "RON",
  "RUB",
  "RWF",
  "SAR",
  "SDG",
  "SEK",
  "THB",
  "TND",
  "TRY",
  "TWD",
  "TZS",
  "UAH",
  "UGX",
  "USD",
  "UYU",
  "UZS",
  "VES",
  "VND",
  "XAF",
  "XOF",
  "ZAR"
)

FIAT_RDA = here::here("data", "fiat.rda")

if (!file.exists(FIAT_RDA)) {
  save(FIAT, file = FIAT_RDA, version = 2)
}