|
|
A082581
|
|
Binomial coefficients C(p, k), 2<=k<=p-2, sorted, with duplicates removed, p being prime.
|
|
1
|
|
|
10, 21, 35, 55, 78, 136, 165, 171, 253, 286, 330, 406, 462, 465, 666, 680, 715, 820, 903, 969, 1081, 1287, 1378, 1711, 1716, 1771, 1830, 2211, 2380, 2485, 2628, 3081, 3403, 3654, 3876, 3916, 4495, 4656, 5050, 5253, 5671, 5886, 6188, 6328, 7770, 8001, 8515
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MAPLE
|
with(combinat): S := {}: for n from 3 to 80 do p := ithprime(n): for k from 2 to p-2 do S := S union {binomial(p, k)}: od: od: S := sort(convert(S, list)): for j from 1 to 100 do printf(`%d, `, S[j]) od: # James A. Sellers, May 19 2003
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|