login
1, 1, followed by denominators of A000217(n)*A164555(n)/A027642(n).
0

%I #7 Dec 16 2013 09:47:10

%S 1,1,1,2,1,1,2,1,3,1,2,1,1,1,30,1,1,1,10,1,21,1,10,1,1,1,42,1,1,1,2,1,

%T 231,1,10,1,1,1,2730,1,1,1,110,1,21,1,2,1,1,1,1326,1,11,1,10,1,57,1,

%U 10,1,1,1,30030

%N 1, 1, followed by denominators of A000217(n)*A164555(n)/A027642(n).

%C See A233316.

%t b[-2] = b[-1] = 0; b[1] = 1/2; b[n_] := BernoulliB[n]; a[n_] := (n + 1)*(n + 2)/2*b[n] // Denominator; Table[a[n], {n, -2, 60}]

%Y Cf. A233316 (numerators).

%K nonn,frac

%O -2,4

%A _Jean-François Alcover_ and _Paul Curtz_, Dec 12 2013