OFFSET
1,1
COMMENTS
Equivalently, the n-th row gives the column indices corresponding to 2*n + 1 in the triangle A340804.
LINKS
Stefano Spezia, Table of n, a(n) for n = 1..10175 (first 1500 rows of the triangle, flattened).
EXAMPLE
Triangle begins:
2
2
2
2 3
2 3
2 3 4
2 3
2 3 4
2 3
2 3 4
2 3
2 3 4 5
2 3
2 3 4 5
2 3 6
2 3 4 5
2 3
2 3 4 5 6
...
MATHEMATICA
Table[Union[2Intersection[Divisors[n], Table[d, {d, Floor[(1+Sqrt[1+8n])/4]}]], 2Intersection[Divisors[n], Table[d, {d, Floor[(Sqrt[1+2n]-1)/2]}]]+1], {n, 30}]//Flatten
CROSSREFS
KEYWORD
nonn,tabf
AUTHOR
Stefano Spezia, Feb 21 2021
STATUS
approved
