login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A282564
Real part of A000178(n) * Sum_{k=0..n} i^k/k!, where i = sqrt(-1).
2
1, 1, 1, 6, 156, 18720, 13443840, 67756953600, 2732085780480000, 991419288020582400000, 3597660477435617162035200000, 143607093745702043133526671360000000, 68788027941331539080620236035063808000000000, 428344480781652673551035086691251861743206400000000000
OFFSET
0,4
LINKS
FORMULA
a(n) ~ cos(1) * A000178(n).
a(0) = 1, a(n) = n!*a(n-1) + A000178(n-1)*cos(Pi/2*n).
Lim_{n->infinity} a(n)/G(n+2) = cos(1), where G(z) is the Barnes G-function.
EXAMPLE
For n = 4, a(4) = 156, which is the real part of A000178(4)*(1/0! + i/1! - 1/2! - i/3! + 1/4!) = 156+240*i.
PROG
(PARI) a(n) = real(prod(k=0, n, k!) * sum(k=0, n, I^k/k!));
CROSSREFS
The corresponding imaginary part is A282567.
Sequence in context: A128120 A237529 A306496 * A324231 A283728 A030449
KEYWORD
nonn
AUTHOR
Daniel Suteu, Feb 18 2017
STATUS
approved