|
%I #16 Mar 27 2023 05:46:24
%S 45,55,595,5995,49455,55945,594595,5559445,555594445,9955945495,
%T 55555944445,95444955595,5555559444445,9545454599955,499594959455595,
%U 549999555454495,555555594444445,55555555944444445,5555555559444444445,5999995494459499455
%N Triangular numbers composed of digits {4,5,9}.
%H Giovanni Resta, <a href="http://www.numbersaplenty.com/tr/tr459.html">Tridigital Triangular Numbers</a>.
%F a(n) = A000217(A119209(n)). - _Tyler Busby_, Mar 25 2023
%t 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 *)
%Y Cf. A000217, A053955, A119209. See A119033 for a table of cross-references.
%K nonn,base
%O 1,1
%A _Giovanni Resta_, May 10 2006
%E a(19)-a(20) from _Tyler Busby_, Mar 25 2023
|
