somme d'un vecteur égale à 0

[Chloé Magnin]

Bonjour,

Je voudrais créer un vecteur dont la somme des éléments est égale à 0.
Le vecteur est généré de cette façon: vect<-round(runif(n,-5,5),4).
J'ai essayé de faire une boucle:

Code : Tout sélectionner

coef_variety<-NULL
for (i in 1:length(V_quali)){
  coef_variety[i]<-round(runif(1,-5,5),4)
  while(sum(coef_variety)!=0){
    coef_variety[i]<-round(runif(1,-5,5),4)
  }
}


Pour info length(V_quali)=20
Quelque chose ne va pas dans le code car coef_variety contient seulement des 0 à la fin de la boucle...

Auriez-vous d'autres idées?

Merci pour votre aide,

Chloé

[Logez Maxime]

Bonjour,

Code : Tout sélectionner

vect <- round(runif(n,-5,5),4)
vect <- vect-mean(vect)

Cordialement,
Maxime

[Chloé Magnin]

Merci Maxime !

[Eric Wajnberg]

Une autre solution, parmi une infinité:

Code : Tout sélectionner

> n=10
> x=round(runif(n,-5,5),4)
> x[n]=-sum(x[1:n-1])