From: <vincent_at_7d4.com>

Date: Tue 04 Oct 2005 - 15:59:39 EST

}

R-help@stat.math.ethz.ch mailing list

https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html Received on Tue Oct 04 16:05:02 2005

Date: Tue 04 Oct 2005 - 15:59:39 EST

Eric Pante a écrit :

> Hello Listers,

*> I am trying to sample a vector to create a new one of sample length,
**> witha sum equal to the sum of the initial vector:
**> initial = 10, 30, 10 (sum=50)
**> sample example = 5, 35, 10 (sum=50) or 25, 15, 10 (sum=50), etc ...
**> My problem is to control the sum, so it stays constant.
*

f0 = function()

{

s1 = 50;

for (i in 0:s1)

{ s2 = s1 - i; for (j in 0:s2) { s3 = s2 - j; print (c(i,j,s3)); } }

}

(If I have well understood the question) ?
hih

Vincent

R-help@stat.math.ethz.ch mailing list

https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html Received on Tue Oct 04 16:05:02 2005

*
This archive was generated by hypermail 2.1.8
: Sun 23 Oct 2005 - 18:16:19 EST
*