OFFSET
0,3
COMMENTS
The number of terms in row n is A138705(n).
LINKS
Michael De Vlieger, Table of n, a(n) for n = 0..2884
EXAMPLE
The 12th Bernoulli number is -691/2730. Now 691/2730 has the continued fraction 0 + 1/(3 + 1/(1 + 1/(19 + 1/(3 + 1/11)))). So row 6 is (0,3,1,19,3,11).
MAPLE
A138704row := proc(n) local B; B := abs(bernoulli(2*n)) ; numtheory[cfrac](B, 20, 'quotients') ; end: seq(op(A138704row(n)), n=0..20) ; # R. J. Mathar, Jul 20 2009
MATHEMATICA
Array[ContinuedFraction@ Abs@ BernoulliB[2 #] &, 18, 0] // Flatten (* Michael De Vlieger, Oct 18 2017 *)
CROSSREFS
KEYWORD
nonn,tabf
AUTHOR
Leroy Quet, Mar 26 2008
EXTENSIONS
More terms from R. J. Mathar, Jul 20 2009
STATUS
approved