2013-03-18 251 views
12

我使用geom_segment来绘制活动的时间表。这一切都是一致的,因为我想和其他图表一起展示,所以我宁愿让y轴变得更小。看起来,ggplot2中灰色图形区域的大小总是正方形,不管我是将它放大还是缩小。有没有办法说我想要x = 500 y = 50或类似的东西?您可以将ggplot2图形的比例从正方形更改为矩形吗?

df2 <- structure(list(Activities = 
         structure(c(2L, 1L, 2L, 1L, 2L, 3L, 1L, 2L, 2L, 2L, 2L, 5L, 
            4L, 3L, 2L, 2L), 
           .Label = c("authoring", "hacking", "learning", 
              "surfing", "tasks"), 
           class = "factor"), 
         Start = c(14895L, 15005L, 16066L, 16226L, 16387L, 16394L, 
           27030L,27532L, 27600L, 27687L, 28660L, 28713L, 
           29154L, 30264L, 30345L, 32245L), 
         End = c(15005L, 16066L, 16226L, 16387L,16394L, 16509L, 
           27491L, 27591L, 27628L, 28450L, 28704L, 29109L, 
           30250L, 30345L, 31235L, 33794L)), 
       .Names = c("Activities", "Start", "End"), 
       class = "data.frame", row.names = c(NA, -16L)) 
a <- 0:23 

这里我的剧情:

ggplot(df2, aes(colour=Activities)) + 
    geom_segment(aes(x=Start, xend=End, y=0, yend=0), size=10) + 
    scale_x_continuous(breaks=a * 60 * 60, labels=a) + 
    xlab("Time") + ylab("") + 
    scale_y_continuous(breaks=NULL, limits=c(-.1, .1)) 

Sample timeline chart

+7

图的大小是当前图形设备的大小。改变这一点,你的情节会自动调整。如果要在保存到磁盘时设置大小,请使用'ggsave()'并设置打印大小参数。 – Andrie 2013-03-18 10:01:27

+1

@Andrie:让这个答案? – Roland 2013-03-18 10:42:29

+1

@Andrie你也可以使用'coord_fixed'来修正x和y轴之间的比例,请参阅我的答案。我确实得到了这个表格,你有一段时间回来:)。 – 2013-03-18 10:57:25

回答

16

要解决在x和y轴为某个值(例如,1,或0.2),可以使用coord_fixed()的比率:

g + coord_fixed(ratio = 0.2) 

其中g是您的原始情节。你必须玩一下才能得到你需要的东西。另外,就像@Andrie说的那样,你也可以修正画布的大小,例如使用ggsave

print(g) 
ggsave("/tmp/plt.png", width = 16, height = 9, dpi = 120) 

我会尝试两者,或者可能将它们组合。另见this earlier post

+0

就这么清楚,这里的比例是y/x。供参考 - http://ggplot2.tidyverse.org/reference/coord_fixed.html – TrigonaMinima 2018-01-22 13:19:02