login
Bisection of A005425.
2

%I #8 Apr 02 2023 09:37:36

%S 2,14,142,1850,29186,538078,11317646,266906858,6965034370,

%T 199037675054,6176578272782,206703355298074,7416522514174082,

%U 283886725100730110,11542917975992870926,496687811705758019018,22543169666612417313026

%N Bisection of A005425.

%H G. C. Greubel, <a href="/A100510/b100510.txt">Table of n, a(n) for n = 0..390</a>

%F a(n) = (-i/sqrt(2))^(2*n+1)*hermite(2*n+1, i*sqrt(2)). - _G. C. Greubel_, Apr 01 2023

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

%o (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

%o (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

%Y Cf. A005425, A093620.

%K nonn,easy

%O 0,1

%A _N. J. A. Sloane_, Nov 24 2004

%E More terms from _Hugo Pfoertner_, Nov 25 2004