답변:
이것이 의미인지 확실하지 않지만 설정을 시도하십시오 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)
먼저 차트의 데이터를 작성하십시오.
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()
산출: