A172032 Numerator of the rational sequence c(n) defined by c(n+1) - 2*c(n) = Bernoulli number B_n (A027641/A027642).
0, 1, 3, 19, 19, 379, 379, 3539, 3539, 42461, 42461, 1868459, 1868459, 32384089, 32384089, 388644103, 388644103, 26424178387, 26424178387, 669590253599, 669590253599, 1605990140413, 1605990140413, 148027376624695, 148027376624695, 980410698447157
Offset: 0
Programs
-
PARI
aseq(m) = {cvec = vector(m); cvec[1] = 0; for (i=2, m, cvec[i] = bernfrac(i-2) + 2*cvec[i-1];);} \\Michel Marcus, Feb 03 2013
Extensions
Edited by Michel Marcus, Feb 03 2013
Comments