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

______________________________________________
[email protected] mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html

Reply via email to