|
|
A044731
|
|
Numbers n such that string 1,8 occurs in the base 10 representation of n but not of n+1.
|
|
0
|
|
|
18, 118, 189, 218, 318, 418, 518, 618, 718, 818, 918, 1018, 1118, 1189, 1218, 1318, 1418, 1518, 1618, 1718, 1899, 1918, 2018, 2118, 2189, 2218, 2318, 2418, 2518, 2618, 2718, 2818, 2918, 3018, 3118, 3189, 3218, 3318, 3418
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
SequencePosition[Table[If[SequenceCount[IntegerDigits[n], {1, 8}]>0, 1, 0], {n, 3500}], {1, 0}][[All, 1]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Jan 02 2020 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|