นับค่า NA
เมื่อได้ฟังก์ชันดึงรหัสสถานะที่เข้มงวดขึ้นแล้ว เราจะลองนำไปใช้กับรายการ URL ของเรา
สิ่งที่ต้องการทำคือตรวจสอบว่าเว็บไซต์ใดในรายการของเราส่งคืนรหัสสถานะที่ไม่อยู่ในช่วง 200 ถึง 203 เพื่อทำสิ่งนี้ เราจะกลับการทำงานของฟังก์ชัน is.na() กล่าวคือ แทนที่จะคืนค่า TRUE เมื่อค่าขาดหายไป มันจะคืนค่า FALSE แทน
เวกเตอร์ urls และฟังก์ชัน strict_code() พร้อมใช้งานใน workspace แล้ว และได้โหลด httr และ purrr ไว้ให้เรียบร้อยแล้ว
แบบฝึกหัดนี้เป็นส่วนหนึ่งของหลักสูตร
Functional Programming ระดับกลางด้วย purrr
คำแนะนำการฝึกหัด
รัน
strict_code()กับเวกเตอร์ของ URLกำหนดชื่อให้กับผลลัพธ์ด้วยฟังก์ชัน
set_names()โดยใช้เวกเตอร์urls"กลับ" การทำงานของ
is.na()โดยการนิเสธ (negate) พฤติกรรมของมันใช้ฟังก์ชัน
is_not_na()กับเวกเตอร์ของผลลัพธ์
แบบฝึกหัดเชิงโต้ตอบแบบลงมือทำ
ลองทำแบบฝึกหัดนี้โดยเติมโค้ดตัวอย่างนี้ให้สมบูรณ์
# Map the strict_code function on the urls vector
res <- ___(urls, ___)
# Set the names of the results using the urls vector
res_named <- ___(res, ___)
# Negate the is.na function
is_not_na <- ___(___)
# Run is_not_na on the results
is_not_na(___)