Learn R Programming

bayesmeta (version 3.4)

SnedecorCochran: Artificial insemination of cows example data

Description

This data set gives means and (squared) standard errors of percentages of conceptions obtained from samples for six bulls.

Usage

data("SnedecorCochran")

Arguments

Format

The data frame contains the following columns:

nocharacteridentifier
nnumericsample size
meannumericmean
varnumericvariance (squared standard error)

Details

Quoting from Snedecor and Cochran (1967), Sec. 10.18: “In research on artificial insemination of cows, a series of semen samples from a bull are sent out and tested for their ability to produce conceptions. The following data from a larger set kindly supplied by Dr. G. W. Salisbury, show the percentages of conceptions obtained from the samples for six bulls.”

References

G.W. Snedecor and W.G. Cochran. Statistical Methods. Iowa State University Press, Ames, IA, USA, 6th edition, 1967.

Examples

Run this code
data("SnedecorCochran")

if (FALSE) {
# analyze using uniform prior:
bma1 <- bayesmeta(y=SnedecorCochran[,"mean"],
                  sigma=sqrt(SnedecorCochran[,"var"]),
                  label=SnedecorCochran[,"no"],
                  tau.prior="uniform")

# analyze using Jeffreys prior:
bma2 <- bayesmeta(y=SnedecorCochran[,"mean"],
                  sigma=sqrt(SnedecorCochran[,"var"]),
                  label=SnedecorCochran[,"no"],
                  tau.prior="Jeffreys")

# compare results:
print(bma1)
print(bma2)

forestplot(bma1)
forestplot(bma2)
}

Run the code above in your browser using DataLab