OFFSET
1,2
MAPLE
(-1)*2^(2*n-2)*(2^(2*n-1)-1)*numer(bernoulli(4*n)/n);
PROG
(PARI) a(n) = 2^(2*n-2) * (2^(2*n-1)-1) * numerator(abs(bernfrac(4*n))/n); \\ Michel Marcus, Nov 30 2022
CROSSREFS
KEYWORD
nonn
AUTHOR
EXTENSIONS
Edited by Andrey Zabolotskiy, Nov 30 2022
STATUS
approved