Crea una funzione
Stai ancora cercando di perfezionare i tuoi strumenti di web scraping per essere il più efficiente possibile nel tuo lavoro di data analyst per un'agenzia web.
In questo esercizio renderai la funzione di estrazione del task precedente un po' più rigorosa: se il codice restituito dall'estrattore di stato non è compreso tra 200 e 203, la funzione restituirà un valore mancante (NA). In caso contrario, verrà restituito il codice di stato.
purrr e httr sono già stati caricati per te.
Questo esercizio fa parte del corso
Programmazione funzionale intermedia con purrr
Istruzioni dell'esercizio
Nega l'operatore
%in%, usato per verificare se l'elemento a sinistra è contenuto in quello a destra.Componi una funzione
extract_status(), che sarà una combinazione diGET()estatus_code().Completa la funzione fornita: il codice di stato della
urldeve essere estratto e assegnato a una variabilecode. Poi, se questocodenon è in200:203, restituisci un valore mancante. Altrimenti, restituisci il codice di stato.
Esercizio pratico interattivo
Prova a risolvere questo esercizio completando il codice di esempio.
# Negate the %in% function
`%not_in%` <- ___(`%in%`)
# Compose a status extractor
extract_status <- ___(___, ___)
# Complete the function definition
strict_code <- function(url) {
# Extract the status of the URL
code <- ___(___)
# If code is not in the acceptable range ...
if (code ___ 200:203) {
# then return NA
return(___)
}
code
}