|
%I #8 Jun 13 2017 22:07:51
%S 2,3,5,5,7,14,7,11,44,77,55,11,13,65,156,182,91,13,17,119,442,935,
%T 1122,714,204,17,19,152,665,1729,2717,2508,1254,285,19,23,230,1311,
%U 4692,10948,16744,16445,9867,3289,506,23,29,377,2900,14674,51359,127281
%N Delete first column (index 0) and all rows having nonprime index of triangle T(p,k) defined in A034807 (coefficients of Lucas polynomials). Sequence gives resulting sub-triangle read by rows.
%o (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
%o forprime(p=2,29, for(k=1,p\2,print1(T(p,k),",")))
%Y Cf. A034807.
%Y Row sums are in A160909. - _Klaus Brockhaus_, May 30 2009
%K nonn,tabf
%O 1,1
%A _Lekraj Beedassy_, Jun 24 2004
%E Edited and extended by _Klaus Brockhaus_, Jun 27 2004
|
