# NOT RUN {
stra(rnorm(100,0,2), c(-4.9,-1.3,-0.5,0.3,0.9,2.0,4.9))
stra(c(1:10,15:20,5:30,10:25), c(1,7,13,18,23,30))
data(Roaddamage)
stra(Roaddamage$population, c(1.0,6.9,27.6,168.8,226.5,370.1,2489.8))
# }
Run the code above in your browser using DataLab