New to R
Try this: matrix(sample(dsize, nrolls * ndice, replace = FALSE), nrolls, ndice)
On Mon, Feb 2, 2009 at 12:39 PM, Joe Hughes <joe.hughes at earthlink.net> wrote:
Hello All,
A colleague of mine started working with R and out of curiosity I did
some research on the language. Very nice. In my opinion this is one of the
best languages I've found for getting tasks I'm interested in done. I wrote
this simple die roller and was curious to know if it is R enough.
##############################################################################
#
# Input:
# die_size - 4, 6, 8, 10, 20
# number_of_dice - How many dice to roll
# number_of_rolls - How many times to roll the dice
#
# Output:
# rolls - The array holding the values of the dice
#
##############################################################################
#
function(die_size, number_of_dice, number_of_rolls)
{
rolls <- array(0, dim=c(number_of_rolls, number_of_dice))
for (i in 1:number_of_rolls)
{
rolls[i,] <- sample(die_size, number_of_dice, replace=TRUE)
}
return(rolls)
}
Any thoughts on this function? Is there a better way of doing it in R? Can
you tell I used to play AD&D?
Thanks,
Joe
______________________________________________ R-help at r-project.org mailing list 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.