Calculating Sums Of Roots For Trans. Functions
- To: mathgroup at smc.vnet.net
- Subject: [mg5498] Calculating Sums Of Roots For Trans. Functions
- From: frankst at deakin.edu.au (Frank Stagnitti)
- Date: Sat, 14 Dec 1996 19:26:04 -0500
- Sender: owner-wri-mathgroup at wolfram.com
Can anyone help?
How do i calculate the first n roots of tan(z) = -z, and then sum them in
one command.
I think i need the right combinations of Findroot, Table and N/Sum commands.
Findroot and Table give me a non-unique and non-ordered set of roots e.g.
RootTable = Table[{FindRoot[Tan[z]==-z, {z,i},
MaxIterations ->50],i},{i,0,EndRange,Pi}]
// TableForm
In short, i'd like a procedure/command that essentially sums the first n
(unique and ordered) roots
of tan(z) = - z with no user intervention
Any ideas??
thanks frank
--------------------------------------------------------------------------
Dr Frank Stagnitti
School of Computing and Mathematics, Deakin University,
P.O. Box 423, Warrnambool, Vic. 3280 AUSTRALIA
Email: frankst at deakin.edu.au
Voice: +61 (0)55 633 535
WWW: http://www.cm.deakin.edu.au/~frankst
"Imagination is more important than knowledge." (Albert Einstein)
--------------------------------------------------------------------------