lik <- dbinom(x = 8, prob = rangeP, size = 10) | |
prior <- dnorm(x = rangeP, mean = .5, sd = .1) | |
lines(rangeP, lik * prior, col = "green") |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment