login
A132084
A051717(2n).
1
1, 3, 30, 42, 30, 66, 2730, 6, 510, 798, 330, 138, 2730, 6, 870, 14322, 510, 6, 1919190, 6, 13530, 1806, 690, 282, 46410, 66, 1590, 798, 870, 354, 56786730, 6, 510, 64722, 30, 4686, 140100870, 6, 30, 3318, 230010, 498, 3404310, 6, 61410, 272118, 1410, 6, 4501770
OFFSET
0,2
COMMENTS
Essentially the same as A006954.
a(2n) + a(2n+1) = 4, 72, 96, 2736, 1308, 468, ... are multiples of 4.
MAPLE
C:=proc(n) if n=0 then RETURN(1); fi; if n mod 2 = 0 then RETURN(bernoulli(n)+bernoulli(n-1)); else RETURN(-bernoulli(n)-bernoulli(n-1)); fi; end;
A051717 := proc(n) denom(C(n)) ; end: A132084 := proc(n) A051717(2*n) ; end: seq(A132084(n), n=0..120) ; # R. J. Mathar, Sep 07 2009
CROSSREFS
Sequence in context: A140153 A095045 A061472 * A208880 A012009 A001800
KEYWORD
nonn,frac
AUTHOR
Paul Curtz, Aug 26 2008
EXTENSIONS
Extended by R. J. Mathar, Sep 07 2009
STATUS
approved