आर में ट्रिम किए गए माध्य की गणना कैसे करें (उदाहरण के साथ)

ट्रिम किया गया माध्य एक डेटा सेट का औसत है जिसकी गणना डेटा सेट में सबसे छोटे और सबसे बड़े मानों के एक विशिष्ट प्रतिशत को हटाने के बाद की गई है।

उदाहरण के लिए, 10% छंटनी वाला माध्य सबसे छोटे 10% मानों और सबसे बड़े 10% मानों को हटाने के बाद डेटा सेट के औसत का प्रतिनिधित्व करेगा।

आर में ट्रिम किए गए माध्य की गणना करने का सबसे सरल तरीका निम्नलिखित मूल वाक्यविन्यास का उपयोग करना है:

 #calculate 10% trimmed mean
mean(x, trim= 0.1 )

निम्नलिखित उदाहरण दिखाते हैं कि व्यवहार में कम किए गए औसत की गणना करने के लिए इस फ़ंक्शन का उपयोग कैसे करें।

उदाहरण 1: वेक्टर के ट्रिम किए गए माध्य की गणना करें

निम्नलिखित कोड दिखाता है कि डेटा वेक्टर के लिए 10% ट्रिम किए गए माध्य की गणना कैसे करें:

 #define data
data = c(22, 25, 29, 11, 14, 18, 13, 13, 17, 11, 8, 8, 7, 12, 15, 6, 8, 7, 9, 12)

#calculate 10% trimmed mean
mean(data, trim= 0.1 )

[1] 12,375

10% कम किया गया माध्य 12.375 है।

डेटासेट से सबसे छोटे 10% और सबसे बड़े 10% मान हटा दिए जाने के बाद यह डेटासेट का औसत है।

उदाहरण 2: डेटा फ़्रेम में कॉलम के ट्रिम किए गए माध्य की गणना करें

निम्नलिखित कोड दिखाता है कि डेटा फ़्रेम में किसी विशिष्ट कॉलम के लिए 5% ट्रिम किए गए औसत की गणना कैसे करें:

 #create data frame
df = data. frame (points=c(25, 12, 15, 14, 19, 23, 25, 29),
                assists=c(5, 7, 7, 9, 12, 9, 9, 4),
                rebounds=c(11, 8, 10, 6, 6, 5, 9, 12))

#calculate 5% trimmed mean of points
mean(df$points, trim= 0.05 )

[1] 20.25

“अंक” कॉलम में मानों का 5% छंटनी वाला औसत 20.25 है।

5% सबसे छोटे और 5% सबसे बड़े मानों को हटाने के बाद यह “अंक” कॉलम का औसत है।

उदाहरण 3: एकाधिक स्तंभों के छंटनी किए गए माध्य की गणना करें

निम्नलिखित कोड दिखाता है कि डेटा फ्रेम में एकाधिक कॉलम के लिए 5% ट्रिम किए गए औसत की गणना कैसे करें:

 #create data frame
df = data. frame (points=c(25, 12, 15, 14, 19, 23, 25, 29),
                assists=c(5, 7, 7, 9, 12, 9, 9, 4),
                rebounds=c(11, 8, 10, 6, 6, 5, 9, 12))

#calculate 5% trimmed mean of points and assists
sapply(df[c(' points ', ' assists ')], function (x) mean(x, trim= 0.05 ))

 assist points 
  20.25 7.75 

परिणाम से हम देख सकते हैं:

• “अंक” कॉलम का 5% छंटनी वाला औसत 20.25 है।
• “सहायता” कॉलम का 5% छंटनी वाला औसत 7.75 है।

संबंधित: आर में अप्लाई(), लैप्पली(), सैप्लाई() और टैपप्लाई() के लिए एक गाइड

अतिरिक्त संसाधन

निम्नलिखित ट्यूटोरियल ट्रिम किए गए औसत के बारे में अतिरिक्त जानकारी प्रदान करते हैं:

ट्रिम किए गए माध्य की मैन्युअल रूप से गणना कैसे करें
पायथन में ट्रिम किए गए माध्य की गणना कैसे करें
ट्रिम किया गया माध्य कैलकुलेटर