A276668 a(n) = denominator(b(2*n)) with b(n) = n!*Bernoulli(n,1/2)/(n*(n-1)) for n>=2, b(0)=1, b(1)=0.
1, 12, 120, 56, 16, 88, 208, 16, 544, 152, 16, 368, 32, 16, 928, 992, 64, 8, 592, 16, 1312, 688, 32, 1504, 64, 16, 1696, 32, 64, 1888, 3904, 64, 128, 536, 16, 1136, 2336, 16, 32, 2528, 64, 1328, 32, 32, 5696, 32, 64, 64, 12416, 16, 3232, 3296, 64, 3424, 6976
Offset: 0
Crossrefs
Cf. A276667 (numerators).
Programs
-
Maple
b := n -> `if`(n<2, 1-n, (n-2)!*bernoulli(n,1/2)): a := n -> denom(b(2*n)): seq(a(n), n=0..54);