เริ่มต้นใช้งานเริ่มต้นใช้งานได้ฟรี

ใช้งาน vapply (2)

จากที่ผ่านมา เราเห็นแล้วว่า vapply() ทำงานคล้ายกับ sapply() เมื่อทุกอย่างเป็นไปตามแผน แต่ถ้าไม่เป็นเช่นนั้นล่ะ?

ในวิดีโอ Filip ได้อธิบายว่ามีบางกรณีที่โครงสร้างของผลลัพธ์จากฟังก์ชัน FUN ที่ต้องการ ไม่ตรงกับ template ที่กำหนดไว้ใน FUN.VALUE ในกรณีนี้ vapply() จะแสดงข้อผิดพลาดที่บอกให้รู้ว่าผลลัพธ์ที่ได้จริงไม่ตรงกับที่คาดไว้

แบบฝึกหัดนี้เป็นส่วนหนึ่งของหลักสูตร

R ระดับกลาง

ดูคอร์ส

คำแนะนำการฝึกหัด

  • ตรวจดูโค้ดที่โหลดไว้ล่วงหน้า แล้วลองรันดู หากยังไม่ได้แก้ไขอะไร ควรจะมีข้อผิดพลาดขึ้นมา เนื่องจาก vapply() ยังคาดว่า basics() จะคืนค่าเวกเตอร์ที่มีความยาว 3 ข้อความแสดงข้อผิดพลาดจะบอกใบ้ว่าปัญหาอยู่ที่ไหน
  • แก้ไขข้อผิดพลาดโดยปรับคำสั่ง vapply() ให้ถูกต้อง

แบบฝึกหัดเชิงโต้ตอบแบบลงมือทำ

ลองทำแบบฝึกหัดนี้โดยเติมโค้ดตัวอย่างนี้ให้สมบูรณ์

# temp is already available in the workspace

# Definition of the basics() function
basics <- function(x) {
  c(min = min(x), mean = mean(x), median = median(x), max = max(x))
}

# Fix the error:
vapply(temp, basics, numeric(3))
แก้ไขและรันโค้ด