TraMineR绘图布局调整求助：图例移至图下并消除坐标轴间距

针对你提到的两个需求——将图例放置在绘图下方，以及消除X轴与Y轴之间的空隙，我给你调整后的代码和详细说明：

1. 消除X轴与Y轴之间的空隙 #

TraMineR的绘图基于R的基础绘图系统，默认情况下X/Y轴会在数据范围外预留少量空隙（参数xaxs="r"和yaxs="r"）。要消除这个空隙，我们需要在绘图前通过par()设置轴的样式为"i"（即严格匹配数据范围），同时调整绘图边距，为底部的图例留出足够空间。

2. 调整图例位置到下方 #

你已经用到了legend()函数，但需要配合边距设置确保图例完整显示，同时优化参数让布局更美观。

完整调整后的代码 #

# 先设置绘图参数：消除轴空隙，调整边距给图例留空间
par(xaxs="i", yaxs="i", mar=c(5, 4, 1, 1))  # mar参数顺序：下、左、上、右

# 绘制序列分布，关闭自带图例
seqdplot(Activities.seq, with.legend=FALSE)

# 添加底部图例
legend("bottom", 
       legend=attr(Activities.seq, "labels"), 
       fill=attr(Activities.seq, "cpal"), 
       inset=0,  # 调整inset为0，避免图例超出绘图区域
       bty="n",  # 去掉图例边框让布局更简洁，需要边框可改回"o"
       xpd=TRUE, 
       cex=.75,
       ncol=3,
       bg="white"  # 设置图例背景避免与下方内容重叠
)

参数说明 #

• par(xaxs="i", yaxs="i")：强制轴的范围严格匹配数据，彻底消除默认的空隙。
• par(mar=c(5,4,1,1))：增大底部边距（第一个数值），减少顶部边距，确保图例能完整显示。如果图例还是挤，可以把底部数值改成6试试。
• inset=0：你之前用的inset=-.1会让图例超出绘图区域，改成0能让图例刚好贴在绘图底部边缘。
• bty="n"：去掉图例边框让整体布局更清爽，如果你需要保留边框，改回"o"即可。

内容的提问来源于stack exchange，提问作者user11418708