डेटा फ्रेम को मैट्रिक्स में बदलें

profvis ने जिस कोड-लाइन को हाइलाइट किया था, उनमें से एक यह थी जहाँ हमने संभावित पासे के रोल बनाए और नतीजे एक डेटा फ्रेम में स्टोर किए:

df <- data.frame(d1 = sample(1:6, 3, replace = TRUE),
                d2 = sample(1:6, 3, replace = TRUE))

हम इस कोड को दो सुधार करके ऑप्टिमाइज़ कर सकते हैं:

डेटा फ्रेम से मैट्रिक्स पर स्विच करना
6 पासे रोल एक ही स्टेप में जनरेट करना

इससे मिलेगा:

m <- matrix(sample(1:6, 6, replace = TRUE), ncol = 2)

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

कार्यकुशल R कोड लिखना

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

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

डेटा फ्रेम समाधान d() पढ़िए और समझिए.
मैट्रिक्स समाधान m() को पूरा कीजिए.
- m() को 6 एलिमेंट्स और 2 कॉलम वाला matrix बनाना चाहिए.
microbenchmark() फंक्शन का उपयोग करके d() और m() के टाइमिंग्स की तुलना कीजिए.

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

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

# Load the microbenchmark package
___

# The previous data frame solution is defined
# d() Simulates 6 dices rolls
d <- function() {
  data.frame(
    d1 = sample(1:6, 3, replace = TRUE),
    d2 = sample(1:6, 3, replace = TRUE)
  )
}

# Complete the matrix solution
m <- function() {
  ___(sample(1:6, ___, replace = TRUE), ___)
}

# Use microbenchmark to time m() and d()
___(
 data.frame_solution = d(),
 matrix_solution     = ___
)

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