A172457 Numerators of first differences of the sequence A172298(n)/A172282(n).
-5, 5, -1, 1, -1, 1, -1, 1, -1, 25, -25, 477481, -477481, 49, -49, 13082689, -13082689, 1924313689, -1924313689, 30489001321, -30489001321, 730192467169, -730192467169, 55867983514256281, -55867983514256281, 73155570928609
Offset: 0
Programs
-
Maple
Bsq := proc(n) if n =1 then -bernoulli(n)^2 ; else bernoulli(n)^2 ; end if; end proc: B := [seq(Bsq(n),n=0..30)] ; read("transforms"); DIFF(B) ; apply(numer,%) ; # R. J. Mathar, Jul 13 2011
Comments