|
%I #8 Aug 08 2015 21:18:07
%S 1,3,4,4,41,41,47,47,289,289,1502,1502,15551,15551,5809,5809,3818123,
%T 3818123,-76776508,-76776508,934336415,934336415,-127396984577,
%U -127396984577,6013822435553,6013822435553,-149990624319638,-149990624319638,167911724519886437,167911724519886437
%N Numerator of 1 - Sum_{i=1..n} Bernoulli(i).
%e 1, 3/2, 4/3, 4/3, 41/30, 41/30, 47/35, 47/35, 289/210, 289/210, 1502/1155, 1502/1155, 15551/10010, 15551/10010, 5809/15015, 5809/15015, 3818123/510510, 3818123/510510, ... = A100649/A100650.
%p A100649 := proc(n) 1-add( bernoulli(i),i=1..n) ; numer(%) ; end proc: # _R. J. Mathar_, Jul 01 2011
%Y Cf. A027641, A027642.
%K sign,frac
%O 0,2
%A _N. J. A. Sloane_, Dec 05 2004
|
