OFFSET
1,1
COMMENTS
Integers that appears at least twice in the A352242 triangle.
LINKS
David A. Corneth, Table of n, a(n) for n = 1..12994 (terms <= 10^14)
David A. Corneth, PARI program
EXAMPLE
PROG
(PARI) row(n) = vector(n-1, k, (n-k)*(n^3-k^3));
lista(nn) = {my(list = List(), n=2); while (3*n*(n-1)+1 <= nn, my(rown = row(n)); for (k=1, #rown, if (rown[k] <= nn, listput(list, rown[k]))); n++; ); listsort(list); my(res = List()); for (n=1, #list, if (#select(x->(x==list[n]), list) > 1, if (!vecsearch(Vec(res), list[n]), listput(res, list[n]))); ); Vec(res); }
(PARI) \\ See PARI link
CROSSREFS
KEYWORD
nonn
AUTHOR
Michel Marcus, Mar 09 2022, after a suggestion from Vincent Thill
STATUS
approved
