Construye una función
Sigues intentando perfeccionar tus herramientas para hacer web scraping y ser lo más eficiente posible en tu trabajo como analista de datos en una agencia web.
En este ejercicio, vas a hacer que la función extractora del ejercicio anterior sea un poco más estricta: si el código que devuelve el extractor de estado no está entre 200 y 203, la función devolverá un valor ausente (NA). En caso contrario, se devolverá el código de estado.
purrr y httr ya están cargados.
Este ejercicio forma parte del curso
Programación funcional intermedia con purrr
Instrucciones del ejercicio
Nega el operador
%in%, que se usa para comprobar si el elemento de la izquierda está dentro del elemento de la derecha.Compón una función
extract_status(), que será una combinación deGET()ystatus_code().Completa la función dada: el código de estado de la
urldebe extraerse y asignarse a una variablecode. Luego, si estecodeno está en200:203, se devolverá un valor ausente. En caso contrario, se devuelve el código de estado.
ejercicio interactivo práctico
Prueba este ejercicio completando este código de ejemplo.
# 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
}