A096540 Quotients T(p,k)/p, where T(p,k) is the sub-triangle defined in A096539 of the triangle of coefficients of Lucas polynomials (cf. A034807).
1, 1, 1, 1, 1, 2, 1, 1, 4, 7, 5, 1, 1, 5, 12, 14, 7, 1, 1, 7, 26, 55, 66, 42, 12, 1, 1, 8, 35, 91, 143, 132, 66, 15, 1, 1, 10, 57, 204, 476, 728, 715, 429, 143, 22, 1, 1, 13, 100, 506, 1771, 4389, 7752, 9690, 8398, 4862, 1768, 364, 35, 1, 1, 14, 117, 650, 2530, 7084, 14421
Offset: 1
Crossrefs
Row sums are in A064723. - Klaus Brockhaus, May 29 2009
Programs
-
PARI
T(n,k)=if(k<0 || 2*k>n,0,binomial(n-k,k)+binomial(n-k-1,k-1)+(n==0 && k==0)) \\from A034807 forprime(p=2,31, for(k=1,p\2,print1(T(p,k)/p,",")))
Extensions
Edited and extended by Klaus Brockhaus, Jun 27 2004