~~~888~~~ ,e,
888 e88~-_ 888-~\ d88~\ " e88~-_ 888-~88e
888 d888 i 888 C888 888 d888 i 888 888 ____ ____
888 8888 | 888 Y88b 888 8888 | 888 888
888 Y888 ' 888 888D 888 Y888 ' 888 888 d88b
888 "88_-~ 888 \_88P 888 "88_-~ 888 888 Y88P
> library(devtools)> install_github("LeytonTaylor/TorsionR");> library(TorsionR);@param alpha A vector of 3 expressions defining the parametric curve@param t Evaluation parameter@return Scalar value Torsion of alpha at time t@details alpha must be a vector of 3 parametric expressions with param 't'@examples> tAlpha <- torsion(c(expression(1 + t + cos(t)*sin(t),1 + 0.1*sin(t) + cos(t) * 0.1,0.1*sin(t))), 2)Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.