A100510 Bisection of A005425.

2, 14, 142, 1850, 29186, 538078, 11317646, 266906858, 6965034370, 199037675054, 6176578272782, 206703355298074, 7416522514174082, 283886725100730110, 11542917975992870926, 496687811705758019018, 22543169666612417313026

Offset: 0

Author

N. J. A. Sloane, Nov 24 2004

Keywords

• nonn
• easy

Links

• G. C. Greubel, Table of n, a(n) for n = 0..390

Crossrefs

Cf. A005425, A093620.

Programs

Magma

[n le 2 select 2*(6*n-5) else (4*n-1)*Self(n-1) - 2*(n-2)*(2*n-3)*Self(n-2): n in [1..40]]; // G. C. Greubel, Apr 01 2023

Mathematica

Table[(-I/Sqrt[2])^(2*n+1)*HermiteH[2*n+1, I*Sqrt[2]], {n,0,40}] (* G. C. Greubel, Apr 01 2023 *)

SageMath

[(-i/sqrt(2))^(2*n+1)*hermite(2*n+1, i*sqrt(2)) for n in range(41)] # G. C. Greubel, Apr 01 2023

Formula

a(n) = (-i/sqrt(2))^(2*n+1)*hermite(2*n+1, i*sqrt(2)). - G. C. Greubel, Apr 01 2023

Extensions

More terms from Hugo Pfoertner, Nov 25 2004