OFFSET
1,4
COMMENTS
Columns of A converge to A132740.
EXAMPLE
Array A begins:
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, ...
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, ...
3, 3, 3, 3, 3, 3, 3, 3, 3, 3, ...
2, 1, 1, 1, 1, 1, 1, 1, 1, 1, ...
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, ...
3, 3, 3, 3, 3, 3, 3, 3, 3, 3, ...
7, 7, 7, 7, 7, 7, 7, 7, 7, 7, ...
4, 2, 1, 1, 1, 1, 1, 1, 1, 1, ...
9, 9, 9, 9, 9, 9, 9, 9, 9, 9, ...
...
MATHEMATICA
Grid[Table[n/GCD[n, 10^k], {n, 12}, {k, 12}]] (* Array *)
Flatten[Table[(n - k + 1)/GCD[n - k + 1, 10^k], {n, 13}, {k, n}]] (* Array antidiagonals flattened *)
CROSSREFS
KEYWORD
nonn,tabl
AUTHOR
L. Edson Jeffery, Jul 25 2014
STATUS
approved