is.error () не может найти функцию, что такое обработка исключений Rpackage: R - PullRequest
0 голосов
/ 28 мая 2020

Как сделать обработку исключений в R внутри al oop? Вот что я пытаюсь сделать.

raiz <- "https://www.dsn.gob.es/es/actualidad/sala-prensa/coronavirus-covid-19-"
raiz2 <- "https://www.dsn.gob.es/es/actualidad/sala-prensa/coronavirus-covid19-"
parrafos <- c()

length(fechas.enlaces) 
for (i in 1:88) {
 if(is.error(pagina.parrafo <- read_html(paste0(raiz,fechas.enlaces[i])))){
   pagina.parrafo <- read_html(paste0(raiz2,fechas.enlaces[i]))
 }else{pagina.parrafo <- read_html(paste0(raiz,fechas.enlaces[i]))} 

   grupo <- html_nodes(pagina.parrafo, xpath = '//div[@class="field-items"]/div/p')
   pos.parrafo <- which(str_detect(grupo, pattern = "casos|asciende|fallecidos|fallecimiento"))
  if (length(pos.parrafo) == 0) {
    parrafo <- NA
  } else {
    parrafo <- html_children(grupo)[pos.parrafo[1]]
    parrafo <- html_text(grupo)[pos.parrafo[1]]
  }
  parrafos <- c(parrafos,parrafo) 

}

Заранее спасибо

1 Ответ

1 голос
/ 28 мая 2020

Функция is.error() не является частью базового R, это часть дополнительного пакета под названием BBmis c. Перед использованием вам необходимо загрузить этот пакет следующим образом: library(BBmisc). Если вы еще не установили пакет, вам нужно сначала запустить install.packages('BBmisc').

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