# NOT RUN {
# get exchange rates for all supported currencies
r1 <- exchange_rate()
print(r1)
# get exchange rates for a set of currencies:
r2 <- exchange_rate(currency = c("usd", "eur", "gbp"))
print(r2)
# }
Run the code above in your browser using DataLab