Question

我正在使用R并拥有一个数据值范围为600-225,000的数组。我可以很好地绘制它，但刻度线的标签会覆盖轴的标签。

现在代码是：

g_range=range(0,list)
plot(list, axes=FALSE, ylab="Total")
axis(2, at=15000*0:g_range[2])

我只是希望能够看到值和标签

Answer 1

为了给你更多空间，将y轴轴标签旋转90度并将y轴描述移出一两行：

 #Generate the data
 list<-exp(seq(log(600), log(225000), length.out=10))
 g_range=range(0,list)

 #Setup the plotting area and plot it
 par(plt=c(0.2, 0.9, 0.2, 0.9))
 plot(list, axes=FALSE, xlab="", ylab="")

 #Plot the x-axis
 axis(1)
 mtext("Index", side=1, line=2)

 #Plot the y-axis     
 axis(2, las=2)
 mtext("Total", side=2, line=5)

Answer 2

当我有很多值时，我喜欢使用ggplot2，因为很容易设置点的不透明度。例如，这使得您需要20个重叠点才能获得黑点。它非常整洁。 ggplot2也有设置轴标签的合理默认值，因此您不必过于担心它。

library(ggplot2)
dat <- data.frame(x1=rnorm(150000), x2=rnorm(150000))
ggplot(dat, aes(x1,x2))+geom_point(alpha=0.05)

R图表大数字

2 个答案: