Elapsed time
system.time() इस्तेमाल करना सुविधाजनक है, लेकिन कई फंक्शन कॉल्स की तुलना करते समय इसकी कुछ सीमाएँ हैं। इस समस्या का हल microbenchmark पैकेज देता है, जिसमें microbenchmark() फंक्शन उपलब्ध है।
यह अभ्यास पाठ्यक्रम का हिस्सा है
कार्यकुशल R कोड लिखना
अभ्यास निर्देश
"movies.csv" और "movies.rds" फाइलें आपके वर्कस्पेस में उपलब्ध हैं.
library()फंक्शन का उपयोग करकेmicrobenchmarkपैकेज लोड कीजिए.microbenchmark(),read.csv(), औरreadRDS()का उपयोग करके, CSV फाइल इम्पोर्ट करने में लगने वाला समय और RDS फाइल इम्पोर्ट करने में लगने वाला समय तुलना कीजिए। परिणाम कोcompareनाम के वैरिएबल में स्टोर करें.microbenchmark()कॉल मेंtimes = 10स्पेसिफाई करें ताकि हर फंक्शन 10 बार कॉल हो.
- नतीजे देखने के लिए
compareप्रिंट कीजिए.
इंटरैक्टिव व्यावहारिक अभ्यास
इस अभ्यास को इस नमूना कोड को पूरा करके आज़माएँ।
# Load the microbenchmark package
library(___)
# Compare the two functions
compare <- microbenchmark(___,
___,
times = ___)
# Print compare
___