Frederic,
you need to be more clear about what you want to do. If you are
sampling 100 numbers from 1:100 with replacement, the sum will always be
greater than 50 (as has already been pointed out).
In addition, you mention trying to eliminate zeros. If you are sampling
from 1:100 there will be no zeros. So what are you really trying to do?
Dan
Dan Nordlund
Port Townsend, WA USA
On 7/19/2016 11:54 AM, Frederic Ntirenganya wrote:
The problem is that there
are some zeros while the numbers should range from 1 to 100
As the replace= TRUE if the smallest candidate is 1 may be replaced
because if I can have 1, fifty times this is equal to 50.
Remember that it is a sampling with a replacement
I am still wondering how I can remove the zero value.
Frederic Ntirenganya
Maseno University,
African Maths Initiative,
Kenya.
Mobile:(+254)718492836
Email: fr...@aims.ac.za
https://sites.google.com/a/aims.ac.za/fredo/
On Tue, Jul 19, 2016 at 9:11 PM, <jlu...@ria.buffalo.edu> wrote:
N <- 100
C <- 50
x <- numeric(N)
for (i in 1:N){
x[i] <- sample(C-sum(x),1)
}
x
sum(x)
*Frederic Ntirenganya <ntfr...@gmail.com <ntfr...@gmail.com>>*
Sent by: "R-help" <r-help-boun...@r-project.org>
07/19/2016 01:41 PM
To
"r-help@r-project.org" <r-help@r-project.org>,
cc
Subject
[R] Sampe numbers
Hi Guys,
I am trying to sample 100 numbers from 1:100
i did it like this:
sample(1:100,100, replace= TRUE)
but i want again include a constraint that their sum must be equal to 50
How could I do it?
Cheers
Frederic Ntirenganya
Maseno University,
African Maths Initiative,
Kenya.
Mobile:(+254)718492836
Email: fr...@aims.ac.za
https://sites.google.com/a/aims.ac.za/fredo/
[[alternative HTML version deleted]]
______________________________________________
R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide
http://www.R-project.org/posting-guide.html
<http://www.r-project.org/posting-guide.html>
and provide commented, minimal, self-contained, reproducible code.
[[alternative HTML version deleted]]
______________________________________________
R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
--
Daniel Noredlund
Bothell, WA USA
______________________________________________
R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.