R/ellipticCylinderPoint.R

ellipticCylinderPoint <- function(ecylinder, A, T){
	ecylinder$C + A*ecylinder$N + ecylinder$R1*cos(T)*ecylinder$U + ecylinder$R2*sin(T)*ecylinder$V
}
aaronolsen/linkR documentation built on June 13, 2019, 5:39 p.m.