library(jsonlite)

url <- “https://min-api.cryptocompare.com/data/v2/histoday?fsym=ETH&tsym=USD&limit=99

resp <- fromJSON(url)

eth <- resp\(Data\)Data

head(eth)

sum(is.na(eth)) sum(is.na(btc))

summary(eth) summary(btc)