A119037 Triangular numbers composed of digits {0,1,4}.
1, 10, 10011, 10440, 41041, 41001040, 141044410, 1010004040, 4104044101, 14041444410, 114011410040100, 440404440401100, 1041401040044401, 40114114410110140, 14001400401400441011, 1040410404040110411004140, 1014411414040144040404100100
Offset: 1
Links
- Giovanni Resta, Tridigital Triangular Numbers
Programs
-
Magma
[t: n in [1..2*10^7] | Set(Intseq(t)) subset {0,1,4} where t is n*(n+1) div 2]; // Vincenzo Librandi, Dec 18 2015
-
Mathematica
Rest[Select[FromDigits/@Tuples[{0, 1, 4}, 12], IntegerQ[(Sqrt[8 # + 1] - 1)/2] &]] (* Vincenzo Librandi, Dec 18 2015 *)
Formula
Extensions
a(17) from Tyler Busby, Mar 27 2023