OFFSET
0,2
EXAMPLE
In row n=4, T(4,4)=352 is divisible by 2^4, T(4,3)=351 is divisible by 3^3, T(4,2)= 350 is divisible by 5^2 and T(4,1)=349 is divisible by 349^1 and T(4,0) is divisible by any x^0.
Table starts
1;
1,2;
2,3,4;
61,62,63,64;
348,349,350,351,352;
PROG
(PARI)
okdivs(n, k) = {fordiv(n, d, if (d != 1 && ispower(d, k), return (1))); return (0); }
oknbrs(n, i) = {my(k); forstep (k=n, 2, -1, if (! okdivs(i+k, k), return (0)); ); return (i); }
row(n) = {if (n == 0, print(1); return; ); my(i = 1); while (1, if (oknbrs(n, i), for (k=0, n, print1(i+k, ", ")); print(); return; ); i++; ); }
tabl(nn) = {for (n=0, nn, row(n); ); }
\\ Michel Marcus, May 14 2013
CROSSREFS
KEYWORD
more,nonn
AUTHOR
Amarnath Murthy, Sep 22 2003
EXTENSIONS
a(5) from R. J. Mathar, Jul 19 2007
a(6) from Sean A. Irvine, Feb 17 2011
STATUS
approved