OFFSET
1,2
LINKS
Giovanni Resta, Tridigital Triangular Numbers
MATHEMATICA
Select[Range[3 10^7], Complement[IntegerDigits[Binomial[# + 1, 2]], {0, 1, 7}] == {} &] (* Vincenzo Librandi, Oct 06 2015 *)
PROG
(Magma) [n: n in [1..2*10^7] | Set(Intseq(Binomial(n+1, 2))) subset [0, 1, 7]]; // Vincenzo Librandi, Oct 06 2015
CROSSREFS
KEYWORD
nonn,base,more
AUTHOR
Giovanni Resta, May 10 2006
EXTENSIONS
a(18)-a(19) from Bert Dobbelaere, Mar 14 2026
STATUS
approved
