|
%I #9 Jul 02 2020 12:56:52
%S 1,1,1,12,1,1,1,4,1,1,240,1,2,1,1,1,48,1,6,1,1,1344,1,16,1,4,1,1,1,
%T 192,1,48,1,4,1,1,3840,1,48,1,24,1,3,1,1,1,1280,1,16,1,40,1,1,1,1,
%U 33792,1,256,1,32,1,8,1,4,1,1,1,3072,1,256,1,32,1,8,1,12,1,1
%N T(n, k) = denominator([x^k] b_n(x)), where b_n(x) = Sum_{k=0..n} binomial(n,k)* Bernoulli(k, 1/2)*x^(n-k). Triangle read by rows, for n >= 0 and 0 <= k <= n.
%C See A335947 for formulas and references concerning the polynomials.
%e First few polynomials are:
%e b_0(x) = 1;
%e b_1(x) = x;
%e b_2(x) = -(1/12) + x^2;
%e b_3(x) = -(1/4)*x + x^3;
%e b_4(x) = (7/240) - (1/2)*x^2 + x^4;
%e b_5(x) = (7/48)*x - (5/6)*x^3 + x^5;
%e b_6(x) = -(31/1344) + (7/16)*x^2 - (5/4)*x^4 + x^6;
%e Triangle starts:
%e 1;
%e 1, 1;
%e 12, 1, 1;
%e 1, 4, 1, 1;
%e 240, 1, 2, 1, 1;
%e 1, 48, 1, 6, 1, 1;
%e 1344, 1, 16, 1, 4, 1, 1;
%e 1, 192, 1, 48, 1, 4, 1, 1;
%e 3840, 1, 48, 1, 24, 1, 3, 1, 1;
%e 1, 1280, 1, 16, 1, 40, 1, 1, 1, 1;
%e 33792, 1, 256, 1, 32, 1, 8, 1, 4, 1, 1;
%Y Cf. A335947 (numerators), A157780 (column 0), A033469 (column 0 even indices only).
%K nonn,frac,tabl
%O 0,4
%A _Peter Luschny_, Jul 01 2020
|
