अपना फ़ंक्शन बनाकर lapply का उपयोग करें
जैसा कि Filip ने निर्देशात्मक वीडियो में समझाया, आप अपनी खुद की फ़ंक्शनों पर भी lapply() का उपयोग कर सकते हैं। आपको बस एक नया फ़ंक्शन लिखना है और सुनिश्चित करना है कि वह वर्कस्पेस में उपलब्ध हो। इसके बाद, आप उसी तरह उस फ़ंक्शन को lapply() के अंदर इस्तेमाल कर सकते हैं जैसे आपने base R फ़ंक्शनों के साथ किया।
पिछले अभ्यास में, आपने अपने पसंदीदा अग्रणी सांख्यिकीविदों की जानकारी को दो कैरेक्टर स्ट्रिंग्स वाले वेक्टर्स की सूची में बदलने के लिए lapply() का इस्तेमाल किया था। अब ऐसा कोड लिखते हैं जो नामों और जन्म-वर्षों को अलग-अलग चुने।
सैंपल कोड में select_first() की परिभाषा पहले से शामिल है, जो एक वेक्टर को इनपुट लेता है और उसके पहले एलिमेंट को रिटर्न करता है.
यह अभ्यास पाठ्यक्रम का हिस्सा है
इंटरमीडिएट R
अभ्यास निर्देश
lapply()के साथsplit_lowके एलिमेंट्स परselect_first()लागू करें और प्राप्त परिणाम को नए वैरिएबलnamesमें असाइन करें।- इसके बाद, एक फ़ंक्शन
select_second()लिखें जो दिए गए वेक्टर के दूसरे एलिमेंट के लिए वही काम करे। - अंत में,
select_second()फ़ंक्शन कोsplit_lowपर लागू करें और आउटपुट को वैरिएबलyearsमें असाइन करें.
इंटरैक्टिव व्यावहारिक अभ्यास
इस अभ्यास को इस नमूना कोड को पूरा करके आज़माएँ।
# Code from previous exercise:
pioneers <- c("GAUSS:1777", "BAYES:1702", "PASCAL:1623", "PEARSON:1857")
split <- strsplit(pioneers, split = ":")
split_low <- lapply(split, tolower)
# Write function select_first()
select_first <- function(x) {
x[1]
}
# Apply select_first() over split_low: names
# Write function select_second()
# Apply select_second() over split_low: years