|
| |
|
|
A096539
|
|
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.
|
|
2
| |
|
|
2, 3, 5, 5, 7, 14, 7, 11, 44, 77, 55, 11, 13, 65, 156, 182, 91, 13, 17, 119, 442, 935, 1122, 714, 204, 17, 19, 152, 665, 1729, 2717, 2508, 1254, 285, 19, 23, 230, 1311, 4692, 10948, 16744, 16445, 9867, 3289, 506, 23, 29, 377, 2900, 14674, 51359, 127281
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
PROG
| (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, 29, for(k=1, p\2, print1(T(p, k), ", ")))
|
|
|
CROSSREFS
| Cf. A034807.
Row sums are in A160909. [From Klaus Brockhaus (klaus-brockhaus(AT)t-online.de), May 30 2009]
Sequence in context: A120724 A117530 A094749 * A067364 A090547 A087308
Adjacent sequences: A096536 A096537 A096538 * A096540 A096541 A096542
|
|
|
KEYWORD
| nonn,tabf
|
|
|
AUTHOR
| Lekraj Beedassy (blekraj(AT)yahoo.com), Jun 24 2004
|
|
|
EXTENSIONS
| Edited and extended by Klaus Brockhaus (klaus-brockhaus(AT)t-online.de), Jun 27 2004
|
| |
|
|
