Как пропустить ошибку в цикле rstudio, когда ошибка является лексической ошибкой: недопустимый символ в тексте json - PullRequest
0 голосов
/ 18 октября 2018

Я работаю с пакетом crypto в rstudio, и мне нужно найти 9 month возвратов вершины 100 coins между Jan 1 and Oct 1.Пока у меня есть

coinreturns <- data.frame(symbol = character(), ninemonth_return = numeric(), stringsAsFactors=FALSE)

for(i in 1:100){
 crypto.list <- crypto_list();
  coin <- crypto.list[i, 1]
  coin_charts <- daily_market(coin)
  coin_charts$timestamp <- as.Date(coin_charts$timestamp)

  coinoct1price <- coin_charts %>% 
    group_by(timestamp) %>% 
    summarize(Avg_priceUSD = mean(price_usd)) %>% 
    arrange(timestamp) %>%
    filter (timestamp == as.Date("2018-10-01"))

  coinjan1price <- coin_charts %>% 
    group_by(timestamp) %>% 
    summarize(Avg_priceUSD = mean(price_usd)) %>% 
    arrange(timestamp) %>%
    filter (timestamp == as.Date("2018-01-01"))

  ninemonth_return <- (coinoct1price[1,2] - coinjan1price[1,2])/coinjan1price[1,2]

coinreturns[i, ] <- list(coin, ninemonth_return)

}

Это загружает возврат для верха 43 coins.Когда я пытаюсь получить ежедневные рыночные данные для 44th coin с помощью функции daily_market, я получаю это сообщение об ошибке

Ошибка: лексическая ошибка: недопустимый символ в тексте json.https://graphs2.coinmarketcap.c (прямо здесь) ------ ^

Я искал способы пропустить ошибки в циклах и видел функцию try или функцию try catch, но у меня по праву есть нолькак бы я реализовал это в этом случае или если я даже на правильном пути здесь.Я был бы признателен за любую помощь.

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...