r - Traminer:具有观察次数的平均时间条形图

Question

因为我还是 TraMineR 的新手，所以我的问题对你们大多数人来说似乎微不足道。我正在使用我的数据绘制同时图，我想在条形图上绘制在不同状态下花费的平均时间。 TramineR 中有命令吗？

Answer 1

最近在 R-Forge 上提供的 TraMineR 开发版本中实现了在平均时间图上添加条形标签的选项。这最终将成为 CRAN 上的 TraMineR v 2.2-3。该选项可通过参数 bar.labels 获得。 , cex.barlab , 和 offset.barlab的plot seqmeant结果的方法.这些参数可以作为 ... 传递seqmtplot 的参数.在后一种情况下，当指定组时，bar.labels应该是一个矩阵，每个组的标签都在列中。
我显示使用 actcal data 如何在条形图上显示平均时间。群在此sex ，但当然可以是您的集群。

library(TraMineR)
data(actcal)
## We use only a sample of 300 cases
set.seed(1)
actcal <- actcal[sample(nrow(actcal),300),]
actcal.lab <- c("> 37 hours", "19-36 hours", "1-18 hours", "no work")
actcal.seq <- seqdef(actcal,13:24,labels=actcal.lab)

group <- factor(actcal$sex)
blab <- NULL
for (i in 1:length(levels(group))){
  blab <- cbind(blab,seqmeant(actcal.seq[group==levels(group)[i],]))
}
seqmtplot(actcal.seq, group=group,
          bar.labels = round(blab,digits=2), cex.barlab=1.2)