## Not run: ------------------------------------
# # execution takes several minutes
# load("data/b1.rda")
# twist <- getTwist(path="barrel 1 bullet 1", bullet = b1, twistlimit=c(-2,0)*1.5625)
## ---------------------------------------------
Run the code above in your browser using DataLab