demo/sec10.4.R

# Example 10.4

# Pr[Males under 148.6 cm or over 193 cm]
pnorm(148.6, mean = 175.6, sd = 7.1) + 
  pnorm(193, mean = 175.6, sd = 7.1, lower.tail = FALSE)

# Pr[Females under 148.6 cm or over 193 cm]
pnorm(148.6, mean = 162.6, sd = 6.4) + 
  pnorm(193, mean = 162.6, sd = 6.4, lower.tail = FALSE)

Try the abd package in your browser

Any scripts or data that you put into this service are public.

abd documentation built on May 2, 2019, 2:14 p.m.