एक फंक्शन बनाएँ
आप अब भी अपने web scraping टूल्स को बेहतर बना रहे हैं ताकि एक वेब एजेंसी में डेटा एनालिस्ट के रूप में अपना काम जितना हो सके उतना कुशलता से कर सकें.
इस अभ्यास में, आप पिछले अभ्यास वाले extractor फंक्शन को थोड़ा ज्यादा सख्त बनाएँगे: अगर status extractor द्वारा लौटाया गया कोड 200 और 203 के बीच नहीं है, तो फंक्शन एक missing value (NA) लौटाएगा. दूसरे मामले में, status code लौटाया जाएगा.
purrr और httr आपके लिए लोड कर दिए गए हैं.
यह अभ्यास पाठ्यक्रम का हिस्सा है
इंटरमीडिएट फ़ंक्शनल प्रोग्रामिंग विथ purrr
अभ्यास निर्देश
%in%ऑपरेटर को negate करें, जो यह जाँचने के लिए इस्तेमाल होता है कि बाएँ वाला एलिमेंट दाएँ वाले एलिमेंट के अंदर है या नहीं.एक
extract_status()फंक्शन compose करें, जोGET()औरstatus_code()का कॉम्बिनेशन होगा.दिए गए फंक्शन को पूरा करें:
urlका status code निकालकरcodeवैरिएबल को असाइन करें. फिर अगर यहcode200:203में नहीं है, तो एक missing value रिटर्न करें. वरना status code रिटर्न करें.
इंटरैक्टिव व्यावहारिक अभ्यास
इस अभ्यास को इस नमूना कोड को पूरा करके आज़माएँ।
# 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
}