使用TraMineR的seqedplot:如何在一个图中绘制选定的危险曲线?

时间:2014-04-24 10:06:30

标签: r traminer

我正在使用TraMineRextras,特别是我对seqedplot函数感兴趣。

这里有一个例子:

data(actcal.tse)
actacl.tse <- actcal.tse[1:500,]
iseq <- unique(actcal.tse$id)
nseq <- length(iseq)
data(actcal)
actcal <- actcal[rownames(actcal) %in% iseq,]
actcal.seqe <- seqecreate(actcal.tse)
seqelength(actcal.seqe) <- rep(12, nseq)

而不是通过执行以下方式绘制所有曲线:

seqedplot(actcal.seqe, type="hazard", breaks=6, group=actcal$sex, lwd=3)

我只会使用sex选项根据变量ignore绘制选定的曲线:

seqedplot(actcal.seqe, type="survival", group=actcal$sex, lwd=3, ignore= c("NoActivity", "Start", "FullTime", "Stop", "LowPartTime", "Increase", "Decrease"))

如何在单个图形中而不是在两个单独的图形中绘制男性和女性选择的曲线?

提前谢谢

1 个答案:

答案 0 :(得分:0)

一种方法可能是将性别绑定到事件类型:

actcal.tse$event <- sprintf("%s-%s", actcal.tse$event, actcal$sex[match(actcal.tse$id, rownames(actcal))])

因为似乎没有选项可以使用groups参数在图表中进行拆分。所以尝试沿着这些方向,并完全省略组选项