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