Example problem data
prize_wheel.RdData from chapter 11 of MA206's text book
Examples
prize_wheel
#> sector_type frequency payout
#> 1 No Prize 9 0
#> 2 Win $1 1 1
#> 3 Win $3 2 3
library(ggplot2)
ggplot(prize_wheel) +
aes(x = payout, y = frequency) +
geom_lollipop()
prize_wheel %>%
merge(prize_wheel, by = NULL) %>%
merge(prize_wheel, by = NULL) %>%
merge(prize_wheel, by = NULL)
#> sector_type.x frequency.x payout.x sector_type.y frequency.y payout.y
#> 1 No Prize 9 0 No Prize 9 0
#> 2 Win $1 1 1 No Prize 9 0
#> 3 Win $3 2 3 No Prize 9 0
#> 4 No Prize 9 0 Win $1 1 1
#> 5 Win $1 1 1 Win $1 1 1
#> 6 Win $3 2 3 Win $1 1 1
#> 7 No Prize 9 0 Win $3 2 3
#> 8 Win $1 1 1 Win $3 2 3
#> 9 Win $3 2 3 Win $3 2 3
#> 10 No Prize 9 0 No Prize 9 0
#> 11 Win $1 1 1 No Prize 9 0
#> 12 Win $3 2 3 No Prize 9 0
#> 13 No Prize 9 0 Win $1 1 1
#> 14 Win $1 1 1 Win $1 1 1
#> 15 Win $3 2 3 Win $1 1 1
#> 16 No Prize 9 0 Win $3 2 3
#> 17 Win $1 1 1 Win $3 2 3
#> 18 Win $3 2 3 Win $3 2 3
#> 19 No Prize 9 0 No Prize 9 0
#> 20 Win $1 1 1 No Prize 9 0
#> 21 Win $3 2 3 No Prize 9 0
#> 22 No Prize 9 0 Win $1 1 1
#> 23 Win $1 1 1 Win $1 1 1
#> 24 Win $3 2 3 Win $1 1 1
#> 25 No Prize 9 0 Win $3 2 3
#> 26 Win $1 1 1 Win $3 2 3
#> 27 Win $3 2 3 Win $3 2 3
#> 28 No Prize 9 0 No Prize 9 0
#> 29 Win $1 1 1 No Prize 9 0
#> 30 Win $3 2 3 No Prize 9 0
#> 31 No Prize 9 0 Win $1 1 1
#> 32 Win $1 1 1 Win $1 1 1
#> 33 Win $3 2 3 Win $1 1 1
#> 34 No Prize 9 0 Win $3 2 3
#> 35 Win $1 1 1 Win $3 2 3
#> 36 Win $3 2 3 Win $3 2 3
#> 37 No Prize 9 0 No Prize 9 0
#> 38 Win $1 1 1 No Prize 9 0
#> 39 Win $3 2 3 No Prize 9 0
#> 40 No Prize 9 0 Win $1 1 1
#> 41 Win $1 1 1 Win $1 1 1
#> 42 Win $3 2 3 Win $1 1 1
#> 43 No Prize 9 0 Win $3 2 3
#> 44 Win $1 1 1 Win $3 2 3
#> 45 Win $3 2 3 Win $3 2 3
#> 46 No Prize 9 0 No Prize 9 0
#> 47 Win $1 1 1 No Prize 9 0
#> 48 Win $3 2 3 No Prize 9 0
#> 49 No Prize 9 0 Win $1 1 1
#> 50 Win $1 1 1 Win $1 1 1
#> 51 Win $3 2 3 Win $1 1 1
#> 52 No Prize 9 0 Win $3 2 3
#> 53 Win $1 1 1 Win $3 2 3
#> 54 Win $3 2 3 Win $3 2 3
#> 55 No Prize 9 0 No Prize 9 0
#> 56 Win $1 1 1 No Prize 9 0
#> 57 Win $3 2 3 No Prize 9 0
#> 58 No Prize 9 0 Win $1 1 1
#> 59 Win $1 1 1 Win $1 1 1
#> 60 Win $3 2 3 Win $1 1 1
#> 61 No Prize 9 0 Win $3 2 3
#> 62 Win $1 1 1 Win $3 2 3
#> 63 Win $3 2 3 Win $3 2 3
#> 64 No Prize 9 0 No Prize 9 0
#> 65 Win $1 1 1 No Prize 9 0
#> 66 Win $3 2 3 No Prize 9 0
#> 67 No Prize 9 0 Win $1 1 1
#> 68 Win $1 1 1 Win $1 1 1
#> 69 Win $3 2 3 Win $1 1 1
#> 70 No Prize 9 0 Win $3 2 3
#> 71 Win $1 1 1 Win $3 2 3
#> 72 Win $3 2 3 Win $3 2 3
#> 73 No Prize 9 0 No Prize 9 0
#> 74 Win $1 1 1 No Prize 9 0
#> 75 Win $3 2 3 No Prize 9 0
#> 76 No Prize 9 0 Win $1 1 1
#> 77 Win $1 1 1 Win $1 1 1
#> 78 Win $3 2 3 Win $1 1 1
#> 79 No Prize 9 0 Win $3 2 3
#> 80 Win $1 1 1 Win $3 2 3
#> 81 Win $3 2 3 Win $3 2 3
#> sector_type.x frequency.x payout.x sector_type.y frequency.y payout.y
#> 1 No Prize 9 0 No Prize 9 0
#> 2 No Prize 9 0 No Prize 9 0
#> 3 No Prize 9 0 No Prize 9 0
#> 4 No Prize 9 0 No Prize 9 0
#> 5 No Prize 9 0 No Prize 9 0
#> 6 No Prize 9 0 No Prize 9 0
#> 7 No Prize 9 0 No Prize 9 0
#> 8 No Prize 9 0 No Prize 9 0
#> 9 No Prize 9 0 No Prize 9 0
#> 10 Win $1 1 1 No Prize 9 0
#> 11 Win $1 1 1 No Prize 9 0
#> 12 Win $1 1 1 No Prize 9 0
#> 13 Win $1 1 1 No Prize 9 0
#> 14 Win $1 1 1 No Prize 9 0
#> 15 Win $1 1 1 No Prize 9 0
#> 16 Win $1 1 1 No Prize 9 0
#> 17 Win $1 1 1 No Prize 9 0
#> 18 Win $1 1 1 No Prize 9 0
#> 19 Win $3 2 3 No Prize 9 0
#> 20 Win $3 2 3 No Prize 9 0
#> 21 Win $3 2 3 No Prize 9 0
#> 22 Win $3 2 3 No Prize 9 0
#> 23 Win $3 2 3 No Prize 9 0
#> 24 Win $3 2 3 No Prize 9 0
#> 25 Win $3 2 3 No Prize 9 0
#> 26 Win $3 2 3 No Prize 9 0
#> 27 Win $3 2 3 No Prize 9 0
#> 28 No Prize 9 0 Win $1 1 1
#> 29 No Prize 9 0 Win $1 1 1
#> 30 No Prize 9 0 Win $1 1 1
#> 31 No Prize 9 0 Win $1 1 1
#> 32 No Prize 9 0 Win $1 1 1
#> 33 No Prize 9 0 Win $1 1 1
#> 34 No Prize 9 0 Win $1 1 1
#> 35 No Prize 9 0 Win $1 1 1
#> 36 No Prize 9 0 Win $1 1 1
#> 37 Win $1 1 1 Win $1 1 1
#> 38 Win $1 1 1 Win $1 1 1
#> 39 Win $1 1 1 Win $1 1 1
#> 40 Win $1 1 1 Win $1 1 1
#> 41 Win $1 1 1 Win $1 1 1
#> 42 Win $1 1 1 Win $1 1 1
#> 43 Win $1 1 1 Win $1 1 1
#> 44 Win $1 1 1 Win $1 1 1
#> 45 Win $1 1 1 Win $1 1 1
#> 46 Win $3 2 3 Win $1 1 1
#> 47 Win $3 2 3 Win $1 1 1
#> 48 Win $3 2 3 Win $1 1 1
#> 49 Win $3 2 3 Win $1 1 1
#> 50 Win $3 2 3 Win $1 1 1
#> 51 Win $3 2 3 Win $1 1 1
#> 52 Win $3 2 3 Win $1 1 1
#> 53 Win $3 2 3 Win $1 1 1
#> 54 Win $3 2 3 Win $1 1 1
#> 55 No Prize 9 0 Win $3 2 3
#> 56 No Prize 9 0 Win $3 2 3
#> 57 No Prize 9 0 Win $3 2 3
#> 58 No Prize 9 0 Win $3 2 3
#> 59 No Prize 9 0 Win $3 2 3
#> 60 No Prize 9 0 Win $3 2 3
#> 61 No Prize 9 0 Win $3 2 3
#> 62 No Prize 9 0 Win $3 2 3
#> 63 No Prize 9 0 Win $3 2 3
#> 64 Win $1 1 1 Win $3 2 3
#> 65 Win $1 1 1 Win $3 2 3
#> 66 Win $1 1 1 Win $3 2 3
#> 67 Win $1 1 1 Win $3 2 3
#> 68 Win $1 1 1 Win $3 2 3
#> 69 Win $1 1 1 Win $3 2 3
#> 70 Win $1 1 1 Win $3 2 3
#> 71 Win $1 1 1 Win $3 2 3
#> 72 Win $1 1 1 Win $3 2 3
#> 73 Win $3 2 3 Win $3 2 3
#> 74 Win $3 2 3 Win $3 2 3
#> 75 Win $3 2 3 Win $3 2 3
#> 76 Win $3 2 3 Win $3 2 3
#> 77 Win $3 2 3 Win $3 2 3
#> 78 Win $3 2 3 Win $3 2 3
#> 79 Win $3 2 3 Win $3 2 3
#> 80 Win $3 2 3 Win $3 2 3
#> 81 Win $3 2 3 Win $3 2 3