MathGroup Archive 2007

[Date Index] [Thread Index] [Author Index]

Search the Archive

RSolve capabilities

  • To: mathgroup at smc.vnet.net
  • Subject: [mg77410] RSolve capabilities
  • From: dimitris <dimmechan at yahoo.com>
  • Date: Thu, 7 Jun 2007 06:35:46 -0400 (EDT)

$VersionNumber
5.2

No questions here.
Just an example of Mathematica's
capabilities.
I don't believe that the following recurence relation
is something trivial!

In[8]:=
sys = {F[n + 2] == n*F[n + 1] + F[n], F[0] == 0, F[1] == 1};

In[10]:=
FullSimplify[RSolve[sys, F[n], n]]

Out[10]=
{{F[n] -> 2*(BesselI[-1 + n, -2]*BesselK[1, 2] + BesselI[1,
2]*BesselK[-1 + n, 2])}}

In[11]:=
F[n_] = %[[1,1,2]];

In[15]:=
Off[N::meprec]
FullSimplify[sys]
On[N::meprec]

Out[15]=
{True, True, True}

Nice job!

Dimitris



  • Prev by Date: Re: display change in version 6
  • Next by Date: Re: display change in version 6
  • Previous by thread: Re: Time, Inverse, Simulation simple dynamical system, speed issue
  • Next by thread: 6.0 Standard Packages?, New Style Documentation?