cp's OEIS Frontend

A276667 a(n) = numerator(b(2*n)) with b(n) = n!*Bernoulli(n,1/2)/(n*(n-1)) for n>=2, b(0)=1, b(1)=0.

%I A276667 #10 Sep 25 2016 04:48:52
%S A276667 1,-1,7,-31,381,-268275,190954395,-8940271725,336335206772565,
%T A276667 -174821527924918875,54202314805255255275,-5543854406384412644150625,
%U A276667 3114120189113602279924264875,-14151357141482747539875264868125,10216485085859695459247479126412709375
%N A276667 a(n) = numerator(b(2*n)) with b(n) = n!*Bernoulli(n,1/2)/(n*(n-1)) for n>=2, b(0)=1, b(1)=0.
%p A276667 b := n -> `if`(n<2, 1-n, (n-2)!*bernoulli(n,1/2)):
%p A276667 a := n -> numer(b(2*n)):
%p A276667 seq(a(n), n=0..14);
%Y A276667 Cf. A276668 (denominators).
%K A276667 sign,frac
%O A276667 0,3
%A A276667 _Peter Luschny_, Sep 24 2016