गलत आर्ग्यूमेंट्स पर एरर फेंकना

यदि कोई उपयोगकर्ता किसी फंक्शन को गलत इनपुट देता है, तो सबसे अच्छा कदम है कि आप एक एरर फेंक कर उन्हें बता दें। दो नियम हैं:

जैसे ही आपको समस्या का पता चले (आमतौर पर फंक्शन की शुरुआत में), तुरंत एरर मैसेज फेंकें।
एरर मैसेज को आसानी से समझ में आने वाला रखें।

इनपुट्स की जाँच करने और असफल होने पर एरर फेंकने के लिए आप assertive की assert_*() फंक्शंस का उपयोग कर सकते हैं।

यह अभ्यास पाठ्यक्रम का हिस्सा है

R में फ़ंक्शन लिखने का परिचय

पाठ्यक्रम देखें

अभ्यास निर्देश

calc_harmonic_mean() की बॉडी में एक लाइन जोड़ें जो यह असर्ट करे कि x न्यूमेरिक है।
देखिए जब आप calc_harmonic_mean() को कोई character आर्ग्यूमेंट पास करते हैं तो क्या होता है।

इंटरैक्टिव व्यावहारिक अभ्यास

इस अभ्यास को इस नमूना कोड को पूरा करके आज़माएँ।

calc_harmonic_mean <- function(x, na.rm = FALSE) {
  # Assert that x is numeric
  ___
  x %>%
    get_reciprocal() %>%
    mean(na.rm = na.rm) %>%
    get_reciprocal()
}

# See what happens when you pass it strings
calc_harmonic_mean(std_and_poor500$sector)

कोड संपादित करें और चलाएँ