Insérer des valeurs dans un vecteur

[Rollot Fabien]

Bonjour j'ai un vecteur de longueur 15 et je voudrais y ajouter des zéro toutes les 5 valeurs mais je ne vois pas comment je peux faire!
Merci, si quelqu'un pourrait m'aider???

Mon vecteur est celui-ci:

Code : Tout sélectionner

 [1] 3.036015 2.996169 2.889598 2.993022 2.912818 3.119166 2.861855 2.887742 2.988669 2.992968 2.985601 2.879321 2.943566 2.824531 2.903550


et je voudrais arriver à celui là :

Code : Tout sélectionner

 3.036015 2.996169 2.889598 2.993022 2.912818 0 0 0 0 3.119166 2.861855 2.887742 2.988669 2.992968 0 0 0 0 2.985601 2.879321 2.943566 2.824531 2.903550


Fabien

[Martin Bécue]

Salut,

Code : Tout sélectionner

vect<-c(3.036015, 2.996169, 2.889598, 2.993022, 2.912818, 3.119166, 2.861855, 2.887742, 2.988669, 2.992968, 2.985601, 2.879321, 2.943566, 2.824531, 2.903550)

lambda<- function(x) {
 for(i in 1:(length(x)/5)) x<-append(x,replicate(4,0), after=5*i)
 x
}

lambda(vect)


Ce serait mieux sans boucle 'for' mais je ne suis pas un pro de R.