Running examples in ‘textshape-Ex.R’ failed
The error most likely occurred in:

> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: combine
> ### Title: Combine Elements
> ### Aliases: combine combine.default combine.data.frame
> 
> ### ** Examples
> 
> (x <- split_token(DATA[["state"]][1], FALSE))
[[1]]
[1] "Computer" "is"       "fun"      "."        "Not"      "too"      "fun"     
[8] "."       

> combine(x)
[1] "Computer is fun. Not too fun."
> 
> (x2 <- split_token(DATA[["state"]], FALSE))
[[1]]
[1] "Computer" "is"       "fun"      "."        "Not"      "too"      "fun"     
[8] "."       

[[2]]
[1] "No"   "it's" "not"  ","    "it's" "dumb" "."   

[[3]]
[1] "What"   "should" "we"     "do"     "?"     

[[4]]
[1] "You"    "liar"   ","      "it"     "stinks" "!"     

[[5]]
[1] "I"       "am"      "telling" "the"     "truth"   "!"      

[[6]]
[1] "How"     "can"     "we"      "be"      "certain" "?"      

[[7]]
[1] "There" "is"    "no"    "way"   "."    

[[8]]
[1] "I"        "distrust" "you"      "."       

[[9]]
[1] "What"    "are"     "you"     "talking" "about"   "?"      

[[10]]
[1] "Shall" "we"    "move"  "on"    "?"     "Good"  "then"  "."    

[[11]]
[1] "I'm"     "hungry"  "."       "Let's"   "eat"     "."       "You"    
[8] "already" "?"      

> combine(x2)
 [1] "Computer is fun. Not too fun."       "No it's not, it's dumb."            
 [3] "What should we do?"                  "You liar, it stinks!"               
 [5] "I am telling the truth!"             "How can we be certain?"             
 [7] "There is no way."                    "I distrust you."                    
 [9] "What are you talking about?"         "Shall we move on? Good then."       
[11] "I'm hungry. Let's eat. You already?"
> 
> (x3 <- split_sentence(DATA))
Error in `[.data.table`(z, , `:=`("sentence_id", 1:.N), by = list(element_id)) : 
  attempt access index 6/6 in VECTOR_ELT
Calls: split_sentence -> split_sentence.data.frame -> [ -> [.data.table
Execution halted