inst/snippet/qq-weibull-fig.R

life01 <- c(16, 34, 53, 75, 93, 120, 150, 191, 240, 339)
gf_qq( ~ life01, distribution = qweibull, 
       dparams = list(shape = 1.4, scale = 144)) %>%
  gf_abline(slope = 1, intercept = 0, color = "gray50", 
            linetype = "dashed")
rpruim/fastR documentation built on Nov. 12, 2023, 12:26 p.m.