|
%I #22 Mar 28 2023 19:00:24
%S 80080840,4448084040,804844884480,4448404804004804800840804848000,
%T 44804084840840840848040408400000
%N Triangular numbers composed of digits {0,4,8}.
%C a(6) > 10^37. - _Max Alekseyev_, May 17 2009
%C a(6) > 10^40. - _Tyler Busby_, Mar 28 2023
%H Giovanni Resta, <a href="http://www.numbersaplenty.com/tr/tr048.html">Tridigital Triangular Numbers</a>.
%F a(n) = A000217(A119076(n)). - _Michel Marcus_, Mar 27 2023
%t Rest[Select[FromDigits/@Tuples[{0, 4, 8}, 12], IntegerQ[(Sqrt[8 # + 1] - 1)/2] &]] (* _Vincenzo Librandi_, Dec 18 2015 *)
%o (Magma) [t: n in [1..2*10^7] | Set(Intseq(t)) subset {0, 4, 8} where t is n*(n+1) div 2]; // _Vincenzo Librandi_, Dec 18 2015
%Y Cf. A000217, A058442, A119076. See A119033 for a table of cross-references.
%K nonn,base,more
%O 1,1
%A _Giovanni Resta_, May 10 2006
| 