周期列は、 n項の後に繰り返される配列です。たとえば、周期列は次のとおりです。
1、2、3、1、2、3、1、2、3、..。
そして、そのシーケンスの期間を各サブシーケンスの項の数と定義します(上記のサブシーケンスは1、2、3です)。したがって、上記のシーケンスの期間は3です。
Rでは、次を使用して、上記のシーケンスを定義できます(無限大ではありませんが)。
sequence <- rep(c(1,2,3),n) #n is a predefined variable
したがってn = 50
、sequence
が、シーケンス1、2、3、1、2、3、...、1、2、3になり、各番号が50回出現したことは明らかです。
の周期性を計算する関数を作成しようとしていますsequence
。擬似コードは次のとおりです。
period <- function(sequence){
subsequence <- subsequence(sequence) #identify the subsequence
len.subsequence <- length(subsequence) #calculate its length
return(len.subsequence) #return it
}
サブシーケンスを特定するにはどうすればよいですか?これはrep
関数の逆のようなもので、シーケンスを渡して初期ベクトルの長さを渡します。