repおよび/またはseq関数を使用してベクトルを連続的に減らしますか？

Question

は私がする必要がどのような

a<-c(1:5) 

、私は1から5までのベクトルを持って継続的に一つの要素を失うことによって、ベクターを繰り返すようにされると仮定します。それが最終的な結果は

1 2 3 4 5 1 2 3 4 1 2 3 1 2 1 

Answer 1

ようにする必要があります私たちは、ベクトルを逆にしてsequence

sequence(rev(a)) 
#[1] 1 2 3 4 5 1 2 3 4 1 2 3 1 2 1 

---

それとも別のオプションを適用することができ、あることtoeplitz

m1 <- toeplitz(a) 
m1[lower.tri(m1, diag=TRUE)] 
#[1] 1 2 3 4 5 1 2 3 4 1 2 3 1 2 1