|
|
A119075
|
|
Triangular numbers composed of digits {0,4,8}.
|
|
2
|
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
FORMULA
|
|
|
MATHEMATICA
|
Rest[Select[FromDigits/@Tuples[{0, 4, 8}, 12], IntegerQ[(Sqrt[8 # + 1] - 1)/2] &]] (* Vincenzo Librandi, Dec 18 2015 *)
|
|
PROG
|
(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
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base,more
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|