Comece agoraComece grátis

Crie uma função

No exercício anterior, vimos como usar safely() para identificar URLs inacessíveis: escrevemos um pequeno processo que chamava uma versão segura de read_lines() e retornava uma lista de $errors.

Neste exercício, vamos tentar outra abordagem, pois não vamos focar apenas nos erros. Em vez de aplicar uma função segura e extrair os elementos "error" dos resultados, vamos escrever uma função auxiliar que vai discard() imediatamente os elementos NULL da saída de safe_read().

Assim, em vez de extrair a parte $error ou $result da saída, vamos conseguir saber se os elementos estão acessíveis (o conteúdo é retornado em $results) ou se não estão (nesse caso, o erro é retornado em $error).

O vetor urls foi fornecido para você.

Este exercicio faz parte do curso

Programação Funcional Intermediária com purrr

Ver curso

Instruções do exercicio

  • Crie uma versão segura de read_lines().

  • Crie uma função chamada safe_read_discard() que execute a versão segura de read_lines() e aplique discard() aos elementos NULL.

  • Aplique (mapeie) essa função na lista de URLs que foi fornecida para você.

exercicio interativo prático

Tente este exercicio completando este código de exemplo.

# Create a safe version of read_lines()
safe_read <- ___

# Code a function that discard() the NULL from safe_read()
safe_read_discard <- function(url){
  ___(___) %>%
    ___(is.null)
}

# Map this function on the url list
res <- ___(urls, ___)
Editar e Executar Código