diff --git a/eoa/global.R b/eoa/global.R index f35f0b7..068d612 100644 --- a/eoa/global.R +++ b/eoa/global.R @@ -17,14 +17,17 @@ api_key <- readLines("api_key.txt") eoa_daily_history <- fromJSON( paste0("https://node-api.flipsidecrypto.com/api/v2/queries/", - "e90160dc-765a-45f7-8a28-d2258c4127e9/data/latest") - #"49534ded-30f3-450a-8d31-558cb159966e/data/latest" - + "49534ded-30f3-450a-8d31-558cb159966e/data/latest") + #"e90160dc-765a-45f7-8a28-d2258c4127e9/data/latest") -- last 391 day version ) eoa_daily_history$eoa_bucket <- cut(eoa_daily_history$UNIQUE_DAYS, - breaks = c(0, 1,3,10,50,100,300, Inf), - labels = c("1","% subset(UNIQUE_DAYS > 1) %>% diff --git a/eoa/server.R b/eoa/server.R index f56e3c9..f68e8c4 100644 --- a/eoa/server.R +++ b/eoa/server.R @@ -62,8 +62,8 @@ shinyServer(function(input, output, session) { days = as.numeric(eoa_stats()$days) x = cut(days, - breaks = c(0, 1,3,10,50,100,300, Inf), - labels = c("1","