OFFSET
1,2
COMMENTS
Inspired by the 4th row given by Guy.
REFERENCES
R. K. Guy, Unsolved Problems in Number Theory, Springer, 1st edition, 1981. See section B18.
EXAMPLE
The triangle begins as:
1;
2, 3;
33, 34, 35;
242, 243, 244, 245;
11605, 11606, 11607, 11608, 11609;
28374, 28375, 28376, 28377, 28378, 28379;
171893, 171894, 171895, 171896, 171897, 171898, 171899;
...
MATHEMATICA
row[n_]:=Module[{}, k=1; nd=DivisorSigma[0, k]; While[Product[Boole[DivisorSigma[0, k+i]==nd], {i, n-1}]!=1, k++; nd=DivisorSigma[0, k]]; Table[i+k, {i, 0, n-1}]]; Array[row, 7]//Flatten
CROSSREFS
KEYWORD
nonn,tabl
AUTHOR
Stefano Spezia, Sep 28 2024
STATUS
approved