Creează o funcție
În exercițiul anterior am văzut cum putem folosi safely() pentru a identifica URL-urile inaccesibile: am scris un mic proces care apela o versiune sigură a funcției read_lines() și returna o listă cu elementele $errors.
În acest exercițiu, vom încerca o altă abordare, fără să ne concentrăm exclusiv pe erori. În loc să mapăm o funcție sigură și să extragem elementele "error" din rezultate, vom scrie o funcție ajutătoare care va aplica imediat discard() pentru a elimina elementele NULL din rezultatul funcției safe_read().
Astfel, în loc să extragem partea $error sau $result din rezultat, vom putea ști dacă elementele sunt accesibile (conținutul este returnat în $results) sau nu (eroarea este returnată în $error).
Vectorul urls a fost deja furnizat pentru tine.
Acest exercițiu face parte din cursul
Programare funcțională intermediară cu purrr
Instrucțiuni pentru exercițiu
Creează o versiune sigură a funcției
read_lines().Creează o funcție numită
safe_read_discard()care va rula versiunea sigură a funcțieiread_lines()și va aplicadiscard()pentru a elimina elementeleNULL.Mapează această funcție pe lista de URL-uri furnizată pentru tine.
Exercițiu interactiv practic
Încearcă acest exercițiu completând acest cod de exemplu.
# 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, ___)