powered by
xbarI(x, sizes)
data(pistonrings) xbarI(pistonrings[1:25,])
Run the code above in your browser using DataLab