|
|
A119050
|
|
Numbers k such that the k-th triangular number contains only digits {0,2,3}.
|
|
2
|
|
|
2, 24, 77, 215, 637, 802, 8002, 25815, 80002, 800002, 2158797, 8000002, 25768322, 66382562, 80000002, 800000002, 8000000002, 21596311362, 80000000002, 800000000002, 8000000000002, 80000000000002, 800000000000002
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Range[3 10^7], Complement[IntegerDigits[Binomial[# + 1, 2]], {0, 2, 3}] == {}&] (* Vincenzo Librandi, Oct 07 2015 *)
|
|
PROG
|
(Magma) [n: n in [1..2*10^7] | Set(Intseq(Binomial(n+1, 2))) subset [0, 2, 3]]; // Vincenzo Librandi, Oct 07 2015
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|