OFFSET
1,1
LINKS
Giovanni Resta, Tridigital Triangular Numbers.
FORMULA
MATHEMATICA
Select[Flatten[Table[FromDigits/@Tuples[{4, 5, 9}, n], {n, 17}]], OddQ[ Sqrt[ 8#+1]]&] (* The program will take a long time to run. *) (* Harvey P. Dale, May 23 2021 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Giovanni Resta, May 10 2006
EXTENSIONS
a(19)-a(20) from Tyler Busby, Mar 25 2023
STATUS
approved