Zbuduj funkcję
Nadal doskonalisz swoje narzędzia do web scrapingu, by jak najefektywniej wykonywać pracę analityka danych w agencji internetowej.
W tym ćwiczeniu sprawisz, że funkcja ekstraktorów z poprzedniego ćwiczenia będzie nieco bardziej restrykcyjna: jeśli kod zwrócony przez ekstraktor statusu nie mieści się w zakresie 200–203, funkcja zwróci brakującą wartość (NA). W przeciwnym razie zwrócony zostanie kod statusu.
Biblioteki purrr i httr są już wczytane.
To ćwiczenie jest częścią kursu
Funkcyjne programowanie średnio zaawansowane z purrr
Instrukcje do ćwiczenia
Zaneguj operator
%in%, który sprawdza, czy element po lewej stronie należy do elementu po prawej.Złóż funkcję
extract_status()jako kombinacjęGET()istatus_code().Uzupełnij podaną funkcję: kod statusu dla
urlpowinien zostać wyekstrahowany i przypisany do zmiennejcode. Następnie, jeślicodenie należy do zakresu200:203, funkcja powinna zwrócić brakującą wartość. W przeciwnym razie zwróć kod statusu.
Interaktywne ćwiczenie praktyczne
Spróbuj tego ćwiczenia, uzupełniając ten przykładowy kod.
# 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
}