"bdstest"
print (x, digits = 4)
print
bds.test
x <- rnorm (100) obj <- bds.test(x) print (obj)
Run the code above in your browser using DataLab