| curve.angle | R Documentation | 
function to calculate 3 point curvature based on law of cosines function is intended to be used with default arguments within a Wormlab data structure
curve.angle(del.x1, del.y1, del.x2, del.y2)
| del.x1 | change from previous point (t-1) to (t0) | 
| del.y1 | change from previous point (t-1) to (t0) | 
| del.x2 | change from t(-2) to t(-1) | 
| del.y2 | change from t(-2) to t(-1) | 
WL.alldata %>% mutate(curve.ang = as.numeric(mapply(MF.matR::curve.angle, del.x1, del.y1, del.x2, del.y2))*180/pi))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.