Pigs | R Documentation |
This data set contains information collected from rolling the pair of pigs (found in the game "Pass the Pigs") 6000 times.
A data frame with 6000 observations on the following 6 variables.
roll number (1-6000)
numerical code for position of black pig
position of black pig coded as a factor
numerical code for position of pink pig
position of pink pig coded as a factor
score of the roll
height from which pigs were rolled (5 or 8 inches)
starting position of the pigs (0 = both pigs backwards, 1 = one bacwards one forwards, 2 = both forwards)
In "Pass the Pigs", players roll two pig-shaped rubber dice and earn or lose points depending on the configuration of the rolled pigs. Players compete individually to earn 100 points. On each turn, a player rolls he or she decides to stop or until "pigging out" or
The pig configurations and their associated scores are
1 = Dot Up (0)
2 = Dot Down (0)
3 = Trotter (5)
4 = Razorback (5)
5 = Snouter (10)
6 = Leaning Jowler (15)
7 = Pigs are touching one another (-1; lose all points)
One pig Dot Up and one Dot Down ends the turn (a "pig out") and results in 0 points for the turn. If the pigs touch, the turn is ended and all points for the game must be forfeited. Two pigs in the Dot Up or Dot Down configuration score 1 point. Otherwise, The scores of the two pigs in different configurations are added together. The score is doubled if both both pigs have the same configuration, so, for example, two Snouters are worth 40 rather than 20.
John C. Kern II, Duquesne University (kern@mathcs.duq.edu)
data(Pigs)
tally( ~ black, data = Pigs )
if (require(tidyr)) {
Pigs %>%
select(roll, black, pink) %>%
gather(pig, state, black, pink) %>%
tally( state ~ pig, data = ., format = "prop", margins = TRUE)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.