OFFSET
1,4
COMMENTS
Motivated by the fact that any prime p divides the binomial coefficients C(p,k)=p!/k!(p-k)! for k=1,...,p-1.
EXAMPLE
Formatted as an irregular triangular table, the sequence reads:
1,/* p=2 */
1,/* p=3 */
1,2,/* p=5 */
1,3,5,/* p=7 */
1,5,15,30,42,/* p=11 */
1,6,22,55,99,132,/* p=13 */
1,8,40,140,364,728,1144,1430,/* p=17 */
1,9,51,204,612,1428,2652,3978,4862,/* p=19 */
etc.
PROG
(PARI) forprime(p=1, 19, for(k=1, p\2, print1(binomial(p, k)/p", ")); print("/* p="p" */"))
CROSSREFS
KEYWORD
nonn
AUTHOR
M. F. Hasler, Aug 16 2012
STATUS
approved