- #1
november1992
- 120
- 0
Homework Statement
r(t)={(4+cos20t) cost,+(4+cos20t) sint,+0.4sin20t}
Calculate the curvature of r[t] for 0≤t≤4pi
Homework Equations
k = | r' x r'' | / | r' |^3
The Attempt at a Solution
r[t_]:={4+Cos[20t]*Cos[t],4+Cos[20t]*Sin[t],0.4Sin[20t]}
k[t_]:=Norm[Cross[r',r'']]/Norm[r']^3
Plot[k[t],{t,0,4Pi}]
I don't get any error messages, but the graph is blank.
http://i.imgur.com/woWlabm.png
http://i.imgur.com/ptUZcVG.png
Last edited: