MathGroup Archive 2002

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

Search the Archive

Re: function assignment to list of functions


Hi,

lets call your polynomes hH[] and

Clear[hH];

MapIndexed[
  SetDelayed[Evaluate[hH[x_, First[#2] - 1]], #1] &, {1, -x, -1 + 
      x^2, -x(-3 + x^2)}]

will do what you want. hH[z,3] gives  -z(-3 + z^2)

Regards
  Jens

Mark Morrissey wrote:
> 
> Hi Folks - I have an alternative form of the set Hermite polynomials I'd
> like to use.  They are defined differently than the mathematica function
> HermiteH.  Unfortunately, the recursive generating function takes way
> too long.  I can generate a list of these functions using the different
> order derrivatives of the gaussian PDF (that's how they're defined):
> 
> {1, -x, -1 + x^2, -x(-3 + x^2) .... }
> 
> But I don't seem to be able to assign each function to H[x_,i_]:=
> where i is the index from 0 to the number of functions in the list.
> 
> Any ideas??
> 
> Thanks in advance.
> 
> Regards - Mark
> Mark Morrissey
> Unv of Oklahoma
> Norman, Oklahoma 73026


  • Prev by Date: Re: Question regarding Compile
  • Next by Date: Re: function assignment to list of functions
  • Previous by thread: function assignment to list of functions
  • Next by thread: Re: function assignment to list of functions