如何用R把大量的学生数据转换为序列模式挖掘的格式？

大家好。我现在手上有3万多个学生做题的数据如下图：

Learning events中的四个字母意义分别是： L 系统提示，C 答对，W 答错，E 学生寻求帮助。 夹在两个下划线中间的数字代表学生做题所花费的时间。其余数字都是学生的目前得分。

问题: 如何把上面的数据转换成如下格式呢？？



因为我想转换成这种格式做sequencial pattern mining. 请问一下该怎么做呢？我是数据挖掘的新手，非常感谢大家的帮助！

library(tidyverse)
library(stringr)
data %>%
    mutate(s = str_extract_all(Learning_events, pattern = "[LCWE]")) %>%
    select(-Learning_events) %>%
    unnest(s) %>%
    group_by(Student_ID) %>%
    mutate(Time = row_number(), value = 1L) %>%
    spread(key = s, value = value, fill = 0) %>%
    select(Student_ID, Time, Item, L, W, E, C)

图挂了。我用文字打出来：

原始数据如下。

Student ID             Item            Learning events
1                        alge209        0L_3_0C_47_1C_59_3
2                        alge209        0L_3_0C_18_1C_22_3C_17_5
3                        alge209        0L_9_0C_81_1W_107_0E_3_0C_67_1C_59_3
4                        alge208        0L_667_0E_24_0C_459_1C_190_3C_164_5  


我想转换成如下这样：

StudentID            Time            Item               L                 W                 E                C
1                           1               alge209          1                 0                  0                 0
1                           2               alge209          0                 0                  0                 1
1                           3               alge209          0                 0                  0                 1
2                           1               alge209          1                 0                  0                 0
2                           2               alge209          0                 0                  0                 1
2                           3               alge209          0                 0                  0                 1
2                           4               alge209          0                 0                  0                 1

http://nianjian.******/tags.php?/%E7%A6%8F%E5%BB%BA%E7%9C%81%E7%AC%AC%E4%BA%8C%E6%AC%A1%E5%85%A8%E5%9B%BD%E5%86%9C%E4%B8%9A%E6%99%AE%E6%9F%A5%E8%B5%84%E6%96%99%E6%B1%87%E7%BC%96/1/13489435936/