向 seqIplot 添加垂直线

Add vertical line to a seqIplot

我正在使用 seqIplot() 在 tramineR 中绘制序列对象。我想在图中添加一条垂直线,类似于 abline(v=x) 但是我不知道如何在这种情况下引用 x 轴。快速浏览 tramineR 文档没有帮助。

x 轴的值只是从左边算起的时间单位数。

但是,要应用 abline,您需要隐藏图例。否则,该图是使用 layout 获得的多重图,不支持 abline.

我使用来自 TraMineRmvad 数据进行说明。

图书馆(TraMineR)

data(mvad)
mvad.lab <- c("employment", "further education", "higher education",
              "joblessness", "school", "training")
mvad.shortlab <- c("EM", "FE", "HE", "JL", "SC", "TR")
mvad.seq <- seqdef(mvad[, 17:86], states = mvad.shortlab,
                   labels = mvad.lab, weights = mvad$weight, xtstep = 6)

第 12 个月的垂直线

seqiplot(mvad.seq, border=NA, with.legend=FALSE)
abline(v=12)