查找和計算重複發生

Question

我希望做一個函數，它將接受三個參數（起始位置，結束位置，長度），並通過該函數，我希望找出每個不同模式的多少次那個特定長度出現，然後我希望提取最大長度。聽起來很混亂。

Answer 1

試試這個：

countSubstring<-function(string,start,end,len) { 
     startChar<-seq(start,end,by=len) 
     table(substring(string,startChar,startChar+(len-1))) 
    } 

    string<-"aabaaaabaaaacaaaabaaaabaa" 

    countSubstring(string,start=1,end=15,len=5) 

    aabaa aacaa 
     2  1