我想用ggplot绘制一组时间序列,在B5纸上打印。
能够制作这个情节:
qplot(trade.date, value, data = meltreg2, geom='line', group = variable) +
facet_grid(variable ~ ., scale = 'free_y') +
scale_x_date(expand=c(0,0), name='') +
opts(strip.text.y = theme_blank(), strip.background = theme_blank(), panel.background =
theme_rect(), panel.grid.major=theme_blank(), panel.grid.minor=theme_blank(), axis.title.x =
theme_blank(), axis.title.y = theme_blank(), panel.margin = unit(0.5, 'line')
)
但有什么方法可以在所有图表(三个图表)上得到刻度和文字吗?
我应该如何将情节保存到最适合B5(风景)的页面?
我想在所有x轴上都有刻度和文字,而不是用theme_blank()来隐藏它们。 (上图中的默认值仅为图表上的刻度线和文字“最后”,但我需要全部)
答案 0 :(得分:1)
你的第一个问题是如何获得刻度和文字。好吧,通过使用opts(...=theme_blank())
,你明确地隐藏了你的情节中的文字。您可以用这种方式控制刻度和文本的显示。
您的第二个问题是如何以特定大小保存图表。为此,您最好的选择是使用ggsave()
。此功能将以各种格式保存ggplot
,您可以指定高度和宽度。我最喜欢的搜索引擎告诉我B5尺寸是6.93×9.84英寸:
ggsave(filename="trade.pdf", plot=last_plot(), width=9.84, height=6.93)