Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A172031
Denominator of the fraction c(n) defined in A172030.
6
1, 1, 2, 6, 3, 30, 15, 70, 35, 210, 105, 2310, 1155, 10010, 5005, 30030, 15015, 510510, 255255, 3233230, 1616615, 1939938, 969969, 44618574, 22309287, 74364290, 37182145, 223092870, 111546435, 6469693230, 3234846615, 66853496710, 33426748355, 200560490130
OFFSET
0,3
MATHEMATICA
c[n_] := 2*c[n-1] + BernoulliB[n-1]; c[0] = 0; c[1] = 1; c[2] = 5/2; a[n_] := c[n] // Denominator; Table[a[n], {n, 0, 33}] (* Jean-François Alcover, Apr 15 2013 *)
CROSSREFS
Sequence in context: A307540 A304087 A284003 * A111678 A206429 A101819
KEYWORD
nonn,frac
AUTHOR
Paul Curtz, Jan 23 2010
EXTENSIONS
Edited and extended by R. J. Mathar, Mar 14 2010
STATUS
approved