OFFSET
1,2
LINKS
Giovanni Resta, Tridigital Triangular Numbers.
FORMULA
MATHEMATICA
Select[FromDigits/@Tuples[{0, 1, 7}, 12], OddQ[Sqrt[8#+1]]&] (* The program generates the first 8 terms of the sequence. *) (* Harvey P. Dale, Sep 06 2022 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Giovanni Resta, May 10 2006
EXTENSIONS
a(15)-a(16) from Tyler Busby, Mar 22 2023
STATUS
approved