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