|
|
A119045
|
|
Triangular numbers composed of digits {0,1,8}.
|
|
2
|
|
|
1, 10, 1081, 8001, 10011, 81810, 108811, 1188111, 8018010, 8801110, 10888111, 80118811, 88000011, 800180010, 881811010, 1088881111, 10808101800, 80001800010, 81108010180, 108888811111, 810008010801, 880818181011, 888000000111, 8000018000010, 10888888111111
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
FORMULA
|
|
|
MATHEMATICA
|
Rest[Select[FromDigits/@Tuples[{0, 1, 8}, 12], OddQ[Sqrt[8#+1]]&]] (* or *) Select[Accumulate[Range[1328*10^3]], SubsetQ[{0, 1, 8}, IntegerDigits[ #]]&](* Harvey P. Dale, May 06 2019 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|