Mathematica 9 is now available
Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2011

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

Search the Archive

Re: How to use SeriesCoefficient to define new functions

  • To: mathgroup at smc.vnet.net
  • Subject: [mg122778] Re: How to use SeriesCoefficient to define new functions
  • From: Simon <simonjtyler at gmail.com>
  • Date: Thu, 10 Nov 2011 06:53:26 -0500 (EST)
  • Delivered-to: l-mathgroup@mail-archive0.wolfram.com
  • References: <j9b6vs$4u6$1@smc.vnet.net> <j9doq6$b6c$1@smc.vnet.net>
  • Reply-to: comp.soft-sys.math.mathematica at googlegroups.com

Hi Liu Xiaojun,

You don't need to uses Series before you uses SeriesCoefficient.
SeriesCoefficient can actually return the general coefficient as a DifferenceRoot object. So you could simply use the following:

p[n_][x1_, x2_, x3_] := 
 Block[{k}, SeriesCoefficient[Exp[x1*k + x2*k^2 + x3*k^3], {k, 0, n}]]

I've used k instead of lambda and I've wrapped the right-hand-side in Block, just in case k has a value already. The first 10 functions can be found using

Table[p[i][x, y, z], {i, 1, 10}] // Simplify

Note: your original code will work if change your SetDelayed := to just Set 
p2[x1_, x2_, x3_] =  SeriesCoefficient[SchurGenerator, {\[Lambda], 0, 2}]

Simon



  • Prev by Date: Re: problem seeing, getting, marking, copying coordinates
  • Next by Date: Re: Question about Manipulate
  • Previous by thread: Re: How to use SeriesCoefficient to define new functions
  • Next by thread: Re: How to use SeriesCoefficient to define new functions