Sestav funkci
Stále se snažíš zdokonalit své nástroje pro web scraping, aby byla tvoje práce datového analytika pro webovou agenturu co nejefektivnější.
V tomto cvičení funkci pro extrakci z předchozího cvičení trochu zpřísníme: pokud kód vrácený extraktorem stavu není v rozsahu 200 až 203, funkce vrátí chybějící hodnotu (NA). V opačném případě se vrátí stavový kód.
purrr a httr jsou už načtené.
Toto cvičení je součástí kurzu
Intermediate Functional Programming with purrr
Pokyny k cvičení
Neguj operátor
%in%, který se používá k ověření, zda se prvek na levé straně nachází v prvku na pravé straně.Pomocí
compose()sestav funkciextract_status()jako kombinaci funkcíGET()astatus_code().Doplň zadanou funkci: stavový kód
urlby měl být extrahován a přiřazen do proměnnécode. Pokud tentocodenespadá do rozsahu200:203, funkce vrátí chybějící hodnotu. V opačném případě vrátí stavový kód.
Interaktivní cvičení na vyzkoušení si v praxi
Vyzkoušejte si toto cvičení dokončením tohoto ukázkového kódu.
# 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
}