आर में बार चार्ट कैसे बनाएं

स्ट्रिप चार्ट एक प्रकार का चार्ट है जो एकल बैंड के साथ संख्यात्मक डेटा प्रदर्शित करता है। बॉक्स प्लॉट के समान, बार चार्ट आपको डेटा के वितरण की कल्पना करने में मदद कर सकते हैं। जब नमूना आकार छोटा होता है, तो बार चार्ट बॉक्स प्लॉट का एक अच्छा विकल्प हो सकता है, ताकि आप अलग-अलग डेटा बिंदु देख सकें।

यह ट्यूटोरियल बताता है कि अंतर्निहित स्ट्रिपचार्ट() फ़ंक्शन का उपयोग करके आर में स्ट्रिप चार्ट कैसे बनाया जाए।

स्ट्रिपचार्ट() फ़ंक्शन

R में बार चार्ट बनाने का मूल सिंटैक्स है:

स्ट्रिपचार्ट (एक्स, विधि, जिटर, मेन, एक्सलैब, वाईलैब, कर्नल, पीसीएच, वर्टिकल, ग्रुप.नाम)

• x : एक संख्यात्मक वेक्टर या प्लॉट करने के लिए संख्यात्मक वेक्टर की एक सूची। कथानक तैयार करने के लिए यह एकमात्र तर्क आवश्यक है।
• विधि : समान मान वाले बिंदुओं को अलग करने के लिए उपयोग की जाने वाली विधि। डिफ़ॉल्ट “ओवरप्लॉट” विधि इन बिंदुओं को ओवरप्लॉट करने का कारण बनती है, लेकिन बिंदुओं को हिलाने के लिए “जिटर” या पॉइंट्स को स्टैक करने के लिए “स्टैक” निर्दिष्ट करना संभव है।
• जिटर : जब विधि = “जिटर” का उपयोग किया जाता है, तो यह लागू करने के लिए जिटरिंग की मात्रा प्रदान करता है।
• मुख्य: चार्ट शीर्षक
• xlab : x-अक्ष लेबल
• ylab : y अक्ष लेबल
• col : कथानक बिंदुओं का रंग
• pch : कथानक बिंदुओं का आकार
• लंबवत : जब लंबवत “सत्य” होता है, तो पथ डिफ़ॉल्ट रूप से क्षैतिज के बजाय लंबवत रूप से खींचा जाता है
• Group.names : यदि एकाधिक संख्यात्मक वेक्टर प्लॉट किए गए हैं, तो प्लॉट के आगे प्रिंट करने के लिए समूह लेबल।

एकल डिजिटल वेक्टर के लिए बार चार्ट

निम्नलिखित उदाहरण एकल संख्यात्मक वेक्टर के लिए बार चार्ट बनाने के लिए एम्बेडेड आर डेटासेट आईरिस का उपयोग करता है।

 #view first six rows of iris dataset
head(iris)

# Sepal.Length Sepal.Width Petal.Length Petal.Width Species
#1 5.1 3.5 1.4 0.2 setosa
#2 4.9 3.0 1.4 0.2 setosa
#3 4.7 3.2 1.3 0.2 setosa
#4 4.6 3.1 1.5 0.2 setosa
#5 5.0 3.6 1.4 0.2 setosa
#6 5.4 3.9 1.7 0.4 setosa

निम्नलिखित कोड Sepal.Length वेरिएबल के लिए एक बेसबैंड चार्ट बनाता है:

 stripchart(iris$Sepal.Length)

हम एक्स-अक्ष पर शीर्षक और लेबल जोड़ने के लिए अतिरिक्त तर्क भी जोड़ सकते हैं, बिंदुओं का रंग बदल सकते हैं, बिंदुओं का आकार बदल सकते हैं, और “जिटर” विधि का उपयोग कर सकते हैं ताकि अलग-अलग बिंदु ओवरलैप न हों:

 stripchart(iris$Sepal.Length,
           main = 'Sepal Length Distribution',
           xlab = 'Sepal Length',
           col = 'red',
           pch = 1,
           method = 'jitter')

बिंदुओं को मिलाने के बजाय, हम उन्हें “स्टैक” कर सकते हैं:

 stripchart(iris$Sepal.Length,
           main = 'Sepal Length Distribution',
           xlab = 'Sepal Length',
           col = 'red',
           pch = 1,
method = 'stack' )

हम प्लॉट को डिफ़ॉल्ट क्षैतिज के बजाय लंबवत रूप से भी प्रदर्शित कर सकते हैं और अक्ष लेबल को y अक्ष पर बदल सकते हैं:

 stripchart(iris$Sepal.Length,
           main = 'Sepal Length Distribution',
ylab = 'Sepal Length' ,
           col = 'red',
           pch = 1,
           method = 'jitter',
vertical = TRUE )

अनेक संख्यात्मक सदिशों के लिए बार चार्ट

हम संख्यात्मक वैक्टरों की सूची पास करके एक ही प्लॉट में कई स्ट्रिप चार्ट भी बना सकते हैं।

निम्नलिखित कोड आईरिस डेटासेट में सेपल लंबाई और चौड़ाई चर युक्त एक सूची बनाता है और एक ही प्लॉट में प्रत्येक चर के लिए एक बार ग्राफ तैयार करता है:

 #create list of variables
x <- list('Sepal Length' = iris$Sepal.Length, 'Sepal Width' = iris$Sepal.Width)

#create plot that contains one strip chart per variable
stripchart(x,
           main = 'Sepal Width & Length Distributions',
           xlab = 'Measurement', 
           ylab = 'Variable',
           col = c('steelblue', 'coral2'),
           pch = 16,
           method = 'jitter')

पिछले उदाहरण की तरह, हम बार चार्ट को डिफ़ॉल्ट क्षैतिज के बजाय लंबवत रूप से प्लॉट करना चुन सकते हैं:

 stripchart(x, main = 'Sepal Width & Length Distributions',
           xlab = 'Measurement', 
           ylab = 'Variable',
           col = c('steelblue', 'coral2'),
           pch = 16,
           method = 'jitter',
vertical = TRUE )

इसके अतिरिक्त, हम फॉर्म y~x के एक सूत्र को स्ट्रिपचार्ट() फ़ंक्शन में पास कर सकते हैं, जहां y एक संख्यात्मक वेक्टर है जिसे x के मान द्वारा समूहीकृत किया गया है।

उदाहरण के लिए, आईरिस डेटासेट में, हम डेटा को उन प्रजातियों के आधार पर समूहित कर सकते हैं जिनके तीन अलग-अलग मान हैं (“सेटोसा”, “वर्सिकोलर” और “वर्जिनिका”) और फिर एक बार ग्राफ में प्रत्येक प्रजाति के लिए सीपल लंबाई को प्लॉट करें:

 stripchart(Sepal.Length ~ Species,
           data = iris,
           main = 'Sepal Length by Species',
           xlab = 'Species', 
           ylab = 'Sepal Length',
           col = c('steelblue', 'coral2', 'purple'),
           pch = 16,
           method = 'jitter',
           vertical = TRUE)

आर में स्ट्रिपचार्ट() फ़ंक्शन के लिए पूर्ण दस्तावेज़ देखने के लिए, बस टाइप करें:

 ?stripchart