       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)
--------------------------------------------------------------------------

• Prev by Date: Re: Inverse????
• Next by Date: Re: ListPlot3D
• Previous by thread: animating a PDE
• Next by thread: Re: Calculating Sums Of Roots For Trans. Functions