# For the goodness of fit test
x = c(1.2, 2.0, 3.3)
bs.test(x)
# p.value with r (sample correlation from the probability plot) and n (sample size) are given
bs.test.pvalue(r=0.6, n=10)
# Critical value with alpha (significane level) and n (sample size).
bs.test.critical(alpha=0.01, n=10)
Run the code above in your browser using DataLab