powered by
xrange(obj)
data(lupin) r <- lupin$roots[[1]] xrange(r)
Run the code above in your browser using DataLab