自定义图形的x轴

时间:2012-12-12 23:02:10

标签: r ggplot2

我正在使用scale_x_discrete()来自定义x轴的刻度和标签。

然而,如图所示,线条切割了右侧y轴,这对我来说不太好看。你能帮我解决这个问题。数据(temp)也显示如下。

> a = ggplot(data = temp, aes(b, c, group=a,shape=a,colour=a), ordered=TRUE) + geom_line() + geom_point() 
> a
> b = a + scale_x_discrete(breaks = c("2","4","8","16","32","64","128"), labels=c("2","4","8","16","32","64","128"))

> temp
       a   b    c
1    One   2  5.1
2    One   4  6.6
3    One   8  7.7
4    One  16  8.4
5    One  32 16.1
6    One  64 38.0
7    One 128 49.2
8    Two   2  5.9
9    Two   4  7.7
10   Two   8  9.2
11   Two  16 10.3
12   Two  32 16.8
13   Two  64 32.4
14   Two 128 45.7
15 Three   2  4.7
16 Three   4  7.0
17 Three   8  8.5
18 Three  16  9.6
19 Three  32 14.8
20 Three  64 31.0
21 Three 128 34.5
22  Four   2  4.3
23  Four   4  6.9
24  Four   8  8.3
25  Four  16  9.1
26  Four  32 14.0
27  Four  64 23.8

enter image description here

2 个答案:

答案 0 :(得分:7)

为什么你使用离散比例看似连续的东西。

如果您将scale_x_discrete替换为scale_x_continuous,则可以按照您的意愿使用。

b <- a + scale_x_continuous(breaks = 2^(1:7))
b

enter image description here 您可能对转换为基数2感兴趣,因为b的数据只显示为2的整数幂。

a + scale_x_continuous(breaks = 2^(1:7), trans = 'log2')

enter image description here

答案 1 :(得分:2)

ggplot网站还有“扩展”参数。将数字调整为您想要实现的任何外观

a + scale_x_discrete(breaks = c("2","4","8","16","32","64","128"),
                     labels=c("2","4","8","16","32","64","128"),
                     expand = c(.1,.1))