如何放大quantmod包中chart_Series生成的底部子图？

你可以通过调整绘图布局或者边距参数来放大add_Series(on = NA)生成的底部子图，具体操作如下：

方法一：用layout自定义面板高度比例 #

直接设置主图和子图的高度占比，比如想让子图和主图一样高，代码如下：

library(quantmod)

# 生成示例数据
p1 <- rnorm(4000) |> cumsum() |> xts(Sys.time()+1:4000) |> to.minutes(name = NULL) |> round(0)+100

# 定义2行1列的布局，主图和子图高度比1:1（可按需修改比例）
layout(matrix(c(1,2), nrow=2), heights = c(1,1))

# 绘制主图时关闭默认布局
chart_Series(p1, layout = NULL)
# 添加底部子图
add_Series(p1, on = NA)

如果想让子图更高，把heights = c(1,1)改成heights = c(1,2)（子图高度是主图的2倍）就行，比例数值可随意调整。

方法二：调整子图的边距参数 #

先绘制好图表，再切换到底部面板调整边距，压缩上下空白来放大子图：

library(quantmod)

p1 <- rnorm(4000) |> cumsum() |> xts(Sys.time()+1:4000) |> to.minutes(name = NULL) |> round(0)+100

chart_Series(p1)
add_Series(p1, on = NA)

# 定位到底部面板
par(mfg = c(2,1))
# 调整边距：下、左、上、右（单位英寸），减小上下边距让子图更舒展
par(mai = c(0.8, 0.8, 0.1, 0.1))

小提示 #

• 用layout的时候一定要给chart_Series加layout = NULL，不然quantmod的默认布局会覆盖你的设置。
• 两种方法里的参数都可以根据你的需求反复调整，直到得到满意的子图大小。

内容的提问来源于stack exchange，提问作者mr.T