OFFSET
1,1
COMMENTS
This is the lower left half of A063173 (whose upper right half is zero), see there for more information and cross-references.
LINKS
EXAMPLE
PROG
(PARI) T=matrix(40, 40, i, j, t=0; until(c[i]%prime(j)^t++, ); t-1); A138948=concat(vector(vecmin(matsize(T)), i, vector(i, j, T[i, j])))
CROSSREFS
KEYWORD
AUTHOR
M. F. Hasler, Apr 27 2008
STATUS
approved