計數在其他變量一定的字符串中的R

Question

我想創建一個名爲Chatid新變量，每次Chat ID: ^^^^^^爲獲得+1創建新的變量出現在鉛變量。

這是怎樣的.csv貌似現在

Lead,Event,Role,Data 
Chat ID: ^^^^^^,,, 
No Value,x,Lead,No Value 
No Value,x,End-user,No Value 
Man,Lead x,Lead,No Value 
Man,x,Lead,No Value 
Man,x,Lead,Hello 
Man,x,Lead,No Value 
No Value,x,End-user,Hello to you too 
Man,x,Lead,how are you? 
Chat ID: ^^^^^^,,, 
No Value,x,Lead,No Value 
No Value,x,End-user,No Value 
Man,x,Lead,No Value 
Man,x,Lead,Hello, how are you? 
Man,x,Lead,No Value 
Man,x,Lead,No Value 
Man,x,Lead,Can i help you? 
No Value,x,End-user,Goodmorning! 

應該怎麼看起來像write.csv後

Chatid, Lead,Event,Role,Data 
1,Chat ID: ^^^^^^,,, 
1,No Value,x,Lead,No Value 
1,No Value,x,End-user,No Value 
1,Man,Lead x,Lead,No Value 
1,Man,x,Lead,No Value 
1,Man,x,Lead,Hello 
1,Man,x,Lead,No Value 
1,No Value,x,End-user,Hello to you too 
1,Man,x,Lead,how are you? 
2,Chat ID: ^^^^^^,,, 
2,No Value,x,Lead,No Value 
2,No Value,x,End-user,No Value 
2,Man,x,Lead,No Value 
2,Man,x,Lead,Hello, how are you? 
2,Man,x,Lead,No Value 
2,Man,x,Lead,No Value 
2,Man,x,Lead,Can i help you? 
2,No Value,x,End-user,Goodmorning! 

這樣，我想讓它可以分析每個單獨聊天（如果這是分開不同聊天的最佳方式）。

Answer 1

你可以使用grepl找到感興趣的字符串出現，然後cumsum在輸出。對於data.frame稱爲df：

df <- cbind(
     Chatid = cumsum(grepl("Chat ID", df$lead)), 
     df 
    )