जवाबों:
निश्चित नहीं है कि यह वही है जो आपका मतलब है, लेकिन सेटिंग का प्रयास करें las=1
। यहाँ एक उदाहरण है:
require(grDevices)
tN <- table(Ni <- stats::rpois(100, lambda=5))
r <- barplot(tN, col=rainbow(20), las=1)
यह अक्ष लेबल की शैली का प्रतिनिधित्व करता है। (0 = समानांतर, 1 = सभी क्षैतिज, 2 = सभी लंबवत अक्ष, 3 = सभी लंबवत)
का उपयोग करें par(las=1)
।
देखें ?par
:
las
numeric in {0,1,2,3}; the style of axis labels.
0: always parallel to the axis [default],
1: always horizontal,
2: always perpendicular to the axis,
3: always vertical.
plot(1, xaxt="n", yaxt="n"); axis(1, las=2); axis(2, las=1)
आपको थीम () फ़ंक्शन का उपयोग करने की आवश्यकता है जो 90 डिग्री तक एक्स-एक्सिस लेबल को घुमाएगी:
ggplot(...)+...+ theme(axis.text.x = element_text(angle=90, hjust=1))
सबसे पहले, चार्ट के लिए डेटा बनाएं
H <- c(1.964138757, 1.729143013, 1.713273714, 1.706771799, 1.67977205)
M <- c("SP105", "SP30", "SP244", "SP31", "SP147")
दूसरा, चार्ट फ़ाइल के लिए नाम दें
png(file = "Bargraph.jpeg", width = 500, height = 300)
तीसरा, बार चार्ट प्लॉट करें
barplot(H,names.arg=M,ylab="Degree ", col= rainbow(5), las=2, border = 0, cex.lab=1, cex.axis=1, font=1,col.axis="black")
title(xlab="Service Providers", line=4, cex.lab=1)
अंत में, फाइल को सेव करें
dev.off()
आउटपुट: