Traminer:带有观察次数的平均时间条形图
Traminer: Mean time barplot with number of observations
因为我对 TraMineR 还是个新手,所以我的问题对你们大多数人来说似乎微不足道。我正在用我的数据绘制平均时间图,我想在条形图上绘制在不同状态下花费的平均时间。 TramineR 中有命令吗?
在平均时间图上添加条形标签的选项已在版本 TraMineR v 2.2-3 中实现。该选项可通过 plot
方法的参数 bar.labels
、cex.barlab
和 offset.barlab
获得 seqmeant
的结果。这些参数可以作为 ...
个参数传递给 seqmtplot
。在后一种情况下,当指定组时,bar.labels
应该是一个矩阵,其中每个组的标签都列在列中。
我使用 actcal
数据展示了如何在条形图上显示平均时间。该组在这里 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)
因为我对 TraMineR 还是个新手,所以我的问题对你们大多数人来说似乎微不足道。我正在用我的数据绘制平均时间图,我想在条形图上绘制在不同状态下花费的平均时间。 TramineR 中有命令吗?
在平均时间图上添加条形标签的选项已在版本 TraMineR v 2.2-3 中实现。该选项可通过 plot
方法的参数 bar.labels
、cex.barlab
和 offset.barlab
获得 seqmeant
的结果。这些参数可以作为 ...
个参数传递给 seqmtplot
。在后一种情况下,当指定组时,bar.labels
应该是一个矩阵,其中每个组的标签都列在列中。
我使用 actcal
数据展示了如何在条形图上显示平均时间。该组在这里 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)