旋转轴标签 - 开卷题库

小开

最佳答案

不知道这是不是你的意思，但尝试设置 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.

小开

正如 Maciej Jo czyk所提到的，您可能还需要增加利润率

par(las=2)
par(mar=c(8,8,1,1)) # adjust as needed
plot(...)

小开

你需要使用主题()函数如下将 x 轴标签旋转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()

产出: