Extraire les codes d'état avec GET()
Pour ce dernier exercice, nous allons passer de la fonction read_lines() à la fonction GET() d'httr.
Nous allons d'abord créer une version de GET() avec possibly() afin de vérifier si certaines des URL que vous avez retournent une erreur. Si vous pouvez accéder à l'URL, un objet de connexion sera renvoyé. À l'intérieur, vous trouverez un élément "status_code".
Ne vous attardez pas aux résultats ; retenez simplement que si GET() renvoie une erreur, c'est que l'URL n'est pas disponible. Le code d'état que nous renvoyons peut sembler un peu du jargon du Web, mais nous en parlerons plus en détail au prochain chapitre. Pour l'instant, souvenez‑vous seulement que 200 signifie que tout s'est déroulé comme prévu.
Le vecteur urls est disponible dans votre espace de travail, et purrr ainsi que httr ont été chargés pour vous.
Cette activité fait partie du cours
Programmation fonctionnelle intermédiaire avec purrr
Instructions de l’exercice
Créez une version de
GET()qui renverraNULLen cas d'erreur.Attribuez des noms aux résultats.
Retirez les
NULL.Extrayez le
"status_code"de chaque élément.
Exercice interactif pratique
Essayez cet exercice en complétant ce code d’exemple.
url_tester <- function(url_list){
url_list %>%
# Map a version of GET() that would otherwise return NULL
map( ___(GET, ___) ) %>%
# Set the names of the result
___( url_list ) %>%
# Remove the NULL
___() %>%
# Extract all the "status_code" elements
map(___)
}
# Try this function on the urls object
___(urls)