2

跟进有关序列图的 y 轴的另一个问题，我正在寻找一种使用 R-package 操作序列图的 x 轴的方法TraMineR。

问题是TraMineR附带了一种简单的方法来调整 x 轴指定xtstep=. 但是，这不能完全控制 x 轴，因为无法独立指定刻度数、刻度标签和刻度的结束/限制。在某些情况下，这可能是一个不错的功能，正如您使用此示例代码或授予以下两个图像所看到的那样：

library(TraMineR) 
data(mvad)
mvad.alphabet <- c("employment", "FE", "HE", "joblessness", "school",
                   "training")
mvad.labels <- c("Employment", "Further Education", "Higher Education",
                 "Joblessness", "School", "Training")
mvad.scodes <- c("EM", "FE", "HE", "JL", "SC", "TR")

## Define sequence objects
mvad.seq <- seqdef(mvad[, 17:86], alphabet = mvad.alphabet,
                   states = mvad.scodes, labels = mvad.labels, weights = mvad$weight)

## Plots
seqIplot(mvad.seq, border=NA, xtstep=1, sortv="from.start") # Many ticks, some tick labels, x-scale shows last month as tick 
seqIplot(mvad.seq, border=NA, xtstep=12, sortv="from.start") # Few ticks, few tick labels, x-scale ends before last 8 months

使用 xtstep=1 的序列图 使用 xtstep=1 的序列索引图

使用 xtstep=12 的序列图 使用 xtstep=12 的序列索引图

4

1 回答 1

2

您可以禁用 x 轴，axes = FALSE然后生成您自己的 x 轴。为此，您还必须禁用自动图例。这是一个例子：

seqIplot(mvad.seq, border=NA, sortv="from.start", axes = F, withlegend=F) 
axis(1, at=c(1,70)-.5, labels = c("Sep. 93","Jun. 99"))
于 2014-08-05T10:29:47.730 回答