Re: Solve this series
- To: mathgroup at smc.vnet.net
- Subject: [mg23845] Re: Solve this series
- From: Brian Higgins <bghiggins at ucdavis.edu>
- Date: Mon, 12 Jun 2000 01:17:36 -0400 (EDT)
- References: <8hsspm$deh@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Chetan,
You can use FindRoot to solve the partial sum. Here is a function
that will do the task
myRoot[nmax_, a_, t_,
initD1_]:=FindRoot[Sum[(2*a_^2*Exp[-D1*(1 + 2*n)^2*Pi^2*t_])/
((1 + 2*n)^2*Pi^2), {n, 0, nmax_}] == 0, {D1, initD1_}]
Please note that the symbol "D" is protected in Mathematica (it is
the derivative operator) and "e" is not the exponential.
Cheers,
Brian
In article <8hsspm$deh at smc.vnet.net>,
Chetan Parikh <chetanparikh at yahoo.com> wrote:
> Hello Steve,
>
> I am trying to solve this series and was wondering if
> you could help me with it
>
> Y = Summation from n=0 to n=infinity
> {8/pi^2(1/((2n+1)^2)*(e^(-Dt((2n+1)^2)pi^2)/4a^2))}
>
> Y, t, and a are known, however D is to be found.
>
> I am not sure how to write this equation. If you can
> give me your fax number, I will fax it to you. I will
> also try to email you a jpeg file later today.
>
> Thanks in advance for your help.
>
> Chetan
>
> __________________________________________________
> Do You Yahoo!?
> Yahoo! Photos -- now, 100 FREE prints!
> http://photos.yahoo.com
>
>
Sent via Deja.com http://www.deja.com/
Before you buy.