# NOT RUN {
# Prices of Bitcoin in USD for all periods
btcusd.ohlc.all <- get_markets(route = "ohlc", pair = "btcusd", exchange = "kraken")
# Hourly prices of Bitcoin in USD for a specific time period
btcusd.ohlc.hourly <- get_markets(route = "ohlc", pair = "btcusd", exchange = "kraken",
list(periods = 3600, before = 1609851600, after = 1609506000))
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab