0
$\begingroup$

Denote by $h_n$ the $n$-th Hermite function. $$ h_n(x) = \frac{(-1)^n }{\sqrt{2^n n! \sqrt{\pi}}} \mathrm{e}^{\frac{x^2}{2}} \frac{\mathrm{d}^n}{\mathrm{d} x^n} \mathrm{e}^{-x^2} $$

I am trying to find the 40th, 41st and 42nd terms in Gram-Schmidt process with Hermite functions $h_n$ on $[-1, 1]$.

I've used the usual procedure for Gram-Schmidt process, but I've been able to calulate only the first 6 terms and then my computer got stuck.

Is there some way to calculate them?

$\endgroup$
10
  • $\begingroup$ Is this question related to Mathematica (TM)? Can you post your Mathematica code? $\endgroup$ Commented Jul 2, 2013 at 17:24
  • $\begingroup$ Have you seen this? functions.wolfram.com/HypergeometricFunctions/HermiteHGeneral/… $\endgroup$
    – bill s
    Commented Jul 2, 2013 at 17:30
  • $\begingroup$ Related (duplicate?): mathematica.stackexchange.com/q/22040/5 $\endgroup$
    – rm -rf
    Commented Jul 2, 2013 at 17:32
  • $\begingroup$ @ bill s: as I understand, its Hermit polynomial-not function... $\endgroup$
    – Mack
    Commented Jul 2, 2013 at 17:40
  • 4
    $\begingroup$ To the closers: I don't see any reason to close this as off topic. Mathematica has a function to deal with problems like this(Orthogonalize), so to me it looks like a fine Mathematica topic. $\endgroup$ Commented Jul 2, 2013 at 20:22

1 Answer 1

3
$\begingroup$

Based on the Wikipedia article you referred, here is a code

u[1] = HermiteH[1, x];
Do[
  u[n] = HermiteH[n, x] - Sum[Integrate[HermiteH[n, x] u[i], 
  {x, -1.0, 1.0}], {i, 1,n-1}], {n, 2, 45}
]; 
$\endgroup$

Your Answer

By clicking “Post Your Answer”, you agree to our terms of service and acknowledge you have read our privacy policy.

Not the answer you're looking for? Browse other questions tagged or ask your own question.