Skip to content
Create a gist now

Instantly share code, notes, and snippets.

Joint Probability Example
Coin <- c()
Die <- c()
for (i in 1:1000) {
Coin[i] <- sample(c("Heads", "Tails"), 1)
Die[i] <- sample(c(1,2,3,4,5,6), 1)
table(Coin, Die)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Something went wrong with that request. Please try again.