A370415 T(n, k) = denominator([x^n] N(1/2, n, x)) where N(a, n, x) is the n-th Nørlund polynomial.
1, 4, 1, 48, 2, 1, 64, 16, 4, 1, 1280, 16, 8, 1, 1, 3072, 256, 32, 24, 4, 1, 86016, 512, 256, 16, 16, 2, 1, 49152, 12288, 1024, 256, 64, 16, 4, 1, 2949120, 6144, 3072, 384, 128, 8, 12, 1, 1, 1310720, 327680, 4096, 1024, 512, 640, 16, 4, 4, 1, 11534336, 131072, 65536, 2048, 2048, 256, 128, 8, 16, 2, 1
Offset: 0
Links
- Niels Erik Nørlund, Vorlesungen über Differenzenrechnung, Springer 1924.
Programs
-
Mathematica
Table[Denominator@CoefficientList[NorlundB[n, 1/2, x], x] , {n, 0, 10}] // Flatten