For Stephan
| steph <- structure(c(148L, 65L, 198L, 53L, 16L, 2004L), .Dim = c(3L, 2L | |
| ), .Dimnames = structure(list(c("EatNoTrans", "Request", "Stealing" | |
| ), c("0", "1")), .Names = c("", "")), class = "table") | |
| chisq_steph <- chisq.test(steph) | |
| chisq_steph$expected |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment