我想在我的TSE数据集上应用TSE-STS函数：
ID activity timestamp
1 scrl 10:20:32
1 reqt 10:21:00
2 reqt 10:22:10
2 down 10:23:12
首先，我应用了seqecreate()函数，它可以正常工作，例如，我得到了以下事件序列：
[1] (REQT)-50-(REQT)-14-(SCRL)-4-(SCRL)-1-(SCRL)-4-(RACS,SCRL)-21-(REOV)-3-(DOWN)-1-(DOWN,DOWN)-27-(RACS)-2209039372
当我想使用以下代码运行TES-STS功能
# ---------------TSE to STS--------------------
events <- c("DOWN", "RACS", "RANV", "RCTM", "REOV", "REQT", "ROCV", "SCRL")
# --- Dropping all previous events.
stm <- seqe2stm(events, dropList=list(DOWN=events[-1],RACS=events[-2], RANV=events[-3],RCTM=events[-4], REOV=events[-5], REQT=events[-6], ROCV=events[-7], SCRL=events[-8]))
lookupframe<-as.data.frame(lookup[1:1655,])
lookupSTS <- TSE_to_STS(lookupframe, id= 4, timestamp = 2, event= 5, stm = stm, tmin = 1, tmax = 12, firstState = "None")
我收到此错误，但我不知道该怎么办：
sts [myi，prevTime：tt]中的错误<-prevState： 目前尚不支持长向量：../ include / Rinlinedfuns.h：519