MathGroup Archive 2001

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

Search the Archive

RE: Expansion Coefficients in Multivariate Series Expansions?

  • To: mathgroup at smc.vnet.net
  • Subject: [mg26607] RE: [mg26579] Expansion Coefficients in Multivariate Series Expansions?
  • From: "David Park" <djmp at earthlink.net>
  • Date: Thu, 11 Jan 2001 10:39:16 -0500 (EST)
  • Sender: owner-wri-mathgroup at wolfram.com

extractCoeff[term_][expr_] := Select[f, NumberQ[#/term] &]/term

f = 50 + 2*x + 3*y + 4*z + 5*x*y + 6*x^2*y*z;

(extractCoeff[#1][f] & ) /@ {1, x, y, z, x*y, x^2*y*z, 
   x^3}
{50, 2, 3, 4, 5, 6, 0}

David Park
djmp at earthlink.net
http://home.earthlink.net/~djmp/ 



> From: A. E. Siegman [mailto:siegman at stanford.edu]
To: mathgroup at smc.vnet.net
> 
> Given an expression that is the sum of products of integer powers of 
> three variables (say x,y,z) multiplied by numerical coefficients:
> 
>    f = c000 + c100 x + c010 y + c001 z + c110 x y + c211 x^2 y z + . . . 
>    
> where the  cijk's are all real numbers, and f may or may not be in 
> Normal (or other) form, how do I find the coefficient of a particular 
> term, e.g. c100 for the x term (*not*  c1000 + c110 y), or  ckmn for the 
> x^k y^m z^n term?
> 
> Neither Coefficient nor SeriesCoefficient seems to do this -- and the  
> SeriesCoefficient[expr, {n1,n2,n3,..}] syntax seems to be mentioned but 
> neither explained or illustrated in the on-line Help.
> 
> Thanks, siegman at stanford.edu
> 



  • Prev by Date: Re: Random Sampling Without Replacement?
  • Next by Date: Re: Expansion Coefficients in Multivariate Series Expansions?
  • Previous by thread: Re: Expansion Coefficients in Multivariate Series Expansions?
  • Next by thread: Re: Expansion Coefficients in Multivariate Series Expansions?