L1-female-birth-rate

R package build

2021-02-18

Tags: example hgen471-2020

proportion of female birth

We are told that 241,945 girls and 251,527 boys were born in Paris from 1745 to 1770.

y = 241945
n = 241945 + 251527
posterior = function(theta) dbeta(theta,shape1 = y+1, shape2 = n- y + 1)
curve(posterior,from = 0,to = 1, main=paste("n = ",n,";  y = ",y),xlab="theta",ylab='posterior')

curve(posterior,from = 0.485,to = 0.495, main=paste("n = ",n,";  y = ",y),xlab="theta",ylab='posterior')

curve(posterior,from = 0.485,to = 0.495, main=paste("n = ",n,";  y = ",y, "; mle shown in gray"),xlab="theta",ylab='posterior')
abline(v=y/n,col='gray')

Reuse

Text and figures are licensed under Creative Commons Attribution CC BY 4.0. The source code is licensed under MIT.

Suggest changes

If you find any mistakes (including typos) or want to suggest changes, please feel free to edit the source file of this page on Github and create a pull request.

Citation

For attribution, please cite this work as

R package build (2021). L1-female-birth-rate. BIOS 25328 Cancer Genomics Class Notes. /post/2021/02/18/l1-female-birth-rate/

BibTeX citation

@misc{
  title = "L1-female-birth-rate",
  author = "R package build",
  year = "2021",
  journal = "BIOS 25328 Cancer Genomics Class Notes",
  note = "/post/2021/02/18/l1-female-birth-rate/"
}