आर में टी वितरण को कैसे प्लॉट करें
आर में वितरण के लिए संभाव्यता घनत्व फ़ंक्शन को प्लॉट करने के लिए, हम निम्नलिखित फ़ंक्शन का उपयोग कर सकते हैं:
- संभाव्यता घनत्व फ़ंक्शन बनाने के लिए dt(x, df)।
- संभाव्यता घनत्व फ़ंक्शन को प्लॉट करने के लिए वक्र (फ़ंक्शन, = NULL से = NULL तक)।
संभाव्यता घनत्व फ़ंक्शन को प्लॉट करने के लिए, हमें dt() फ़ंक्शन में df (स्वतंत्रता की डिग्री) के साथ-साथ कर्व() फ़ंक्शन में से और मान को निर्दिष्ट करने की आवश्यकता है।
उदाहरण के लिए, निम्नलिखित कोड दर्शाता है कि 10 डिग्री स्वतंत्रता वाले वितरण के लिए संभाव्यता घनत्व फ़ंक्शन को कैसे प्लॉट किया जाए, जहां प्लॉट का एक्स-अक्ष -4 और 4 के बीच है:
curve(dt(x, df=10), from=-4, to=4)
सामान्य वितरण के समान, टी वितरण 0 के माध्य के आसपास सममित है।
हम एक शीर्षक जोड़ सकते हैं, वाई अक्ष लेबल बदल सकते हैं, पंक्ति की चौड़ाई बढ़ा सकते हैं, और यहां तक कि कथानक को सौंदर्य की दृष्टि से अधिक आकर्षक बनाने के लिए पंक्ति का रंग भी बदल सकते हैं:
curve(dt(x, df=10), from=-4, to=4, main = 't Distribution (df = 10)', #add title ylab = 'Density', #change y-axis label lwd = 2, #increase line width to 2 col = 'steelblue') #change line color to steelblue
हम स्वतंत्रता की विभिन्न डिग्री के साथ टी वितरण की तुलना करने के लिए ग्राफ़ में कई वक्र भी जोड़ सकते हैं। उदाहरण के लिए, निम्नलिखित कोड df = 6, df = 10, और df = 30 के साथ t वितरण प्लॉट बनाता है:
curve(dt(x, df=6), from=-4, to=4, col='blue') curve(dt(x, df=10), from=-4, to=4, col='red', add=TRUE) curve(dt(x, df=30), from=-4, to=4, col='green', add=TRUE)
हम लेजेंड() फ़ंक्शन का उपयोग करके प्लॉट में एक लेजेंड जोड़ सकते हैं, जो निम्नलिखित सिंटैक्स लेता है:
लेजेंड(x, y=NULL, लेजेंड, भरण, col, bg, lty, cex)
सोना:
- x, y: लेजेंड को स्थापित करने के लिए x और y निर्देशांक का उपयोग किया जाता है
- किंवदंती: किंवदंती में डाला जाने वाला पाठ
- भरें: किंवदंती के अंदर रंग भरें
- col: लेजेंड के अंदर पंक्तियों के लिए उपयोग किए जाने वाले रंगों की सूची
- बीजी: किंवदंती की पृष्ठभूमि का रंग
- लेफ्टिनेंट: लाइन शैली
- सीईएक्स: लेजेंड में पाठ का आकार
हमारे उदाहरण में हम एक किंवदंती बनाने के लिए निम्नलिखित वाक्यविन्यास का उपयोग करेंगे:
#create density plots curve(dt(x, df=6), from=-4, to=4, col='blue') curve(dt(x, df=10), from=-4, to=4, col='red', add=TRUE) curve(dt(x, df=30), from=-4, to=4, col='green', add=TRUE) #add legend legend(-4, .3, legend=c("df=6", "df=10", "df=30"), col=c("blue", "red", "green"), lty=1, cex=1.2)