Re: function assignment to list of functions
- To: mathgroup at smc.vnet.net
- Subject: [mg33704] Re: function assignment to list of functions
- From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
- Date: Tue, 9 Apr 2002 01:02:30 -0400 (EDT)
- Organization: Universitaet Leipzig
- References: <a8rhie$b79$1@smc.vnet.net>
- Reply-to: kuska at informatik.uni-leipzig.de
- Sender: owner-wri-mathgroup at wolfram.com
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