web-dev-qa-db-ja.com

ggplot2グラフの比率を正方形から長方形に変更できますか?

geom_segmentを使用して、アクティビティのタイムラインをプロットしています。すべて同じ線上にあり、他のグラフと一緒に表示したいので、y軸をはるかに小さくします。しかし、gpplot2の灰色のグラフ領域のサイズは、拡大または縮小しても常に正方形であるようです。 x = 500 y = 50またはそのようなものが欲しいと言う方法はありますか?

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

14
Stian Håklev

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)

私は両方を試すか、多分それらを組み合わせます。 この以前の投稿 も参照してください。

26
Paul Hiemstra