# Explicity defining the inputs
bp_cdf(age = 96, male = 1, sbp = 103, dbp = 55)
# Plotting two cdfs from a call to p_bp
x <- p_bp(q_sbp = rep(100, 2),
q_dbp = rep( 60, 2),
age = rep(35.75, 2),
male = c(0, 0),
height = c(NA, 100))
bp_cdf(x)
# Plotting a cdf from a call to q_bp
x <- q_bp(p_sbp = 0.85, p_dbp = 0.95,
age = 29.2, male = 0, height_percentile = 0.95,
source = "flynn2017")
bp_cdf(x)
Run the code above in your browser using DataLab