R中的Arules序列挖掘

Bti*_*rt3 8 r arules

我希望arulesSequences在R中使用该软件包.但是,我不知道如何将我的数据框强制转换为可以利用此软件包的对象.

这是一个复制我的数据结构的玩具数据集:

ids <- c(rep("X", 5), rep("Y", 5), rep("Z", 5))
seq <- rep(1:5,3)
val <- sample(LETTERS, 15, replace=T)
df <- data.frame(ids, seq, val)
df

   ids seq val
1    X   1   T
2    X   2   H
3    X   3   V
4    X   4   A
5    X   5   X
6    Y   1   D
7    Y   2   B
8    Y   3   A
9    Y   4   D
10   Y   5   P
11   Z   1   Q
12   Z   2   R
13   Z   3   W
14   Z   4   W
15   Z   5   P
Run Code Online (Sandbox Code Playgroud)

任何帮助将不胜感激.

chr*_*ris 1

因子数据框:

df_fact = data.frame(lapply(df,as.factor))
Run Code Online (Sandbox Code Playgroud)

构建“交易”数据:

df_trans = as(df_fact, 'transactions')
Run Code Online (Sandbox Code Playgroud)

测试一下:

itemFrequencyPlot(df_trans, support = 0.1, cex.names=0.8)
Run Code Online (Sandbox Code Playgroud)