# NOT RUN {
Sys.setenv(tz = "UTC")
poloniex.public <- PoloniexPublicAPI()
pair <- "BTC_NXT"
from <- as.POSIXct("2012-04-01 00:00:00 UTC")
to <- as.POSIXct("2012-04-09 00:00:00 UTC")
period <- "4H"
chart.data <- ReturnChartData(theObject = poloniex.public,
pair = pair,
from = from,
to = to,
period = period)
# }
Run the code above in your browser using DataLab