OFFSET
0,2
MATHEMATICA
Table[(-1)^(n+1) 2(16^n-1)BernoulliB[2n], {n, 0, 20}] (* Harvey P. Dale, Nov 10 2011 *)
PROG
(PARI) a(n)=(-1)^(n+1)*2*(16^n-1)*bernfrac(2*n)
CROSSREFS
KEYWORD
nonn
AUTHOR
Benoit Cloitre, Dec 13 2003
STATUS
approved