|
|
A044661
|
|
Numbers n such that string 3,2 occurs in the base 9 representation of n but not of n+1.
|
|
1
|
|
|
29, 110, 191, 269, 272, 353, 434, 515, 596, 677, 758, 839, 920, 998, 1001, 1082, 1163, 1244, 1325, 1406, 1487, 1568, 1649, 1727, 1730, 1811, 1892, 1973, 2054, 2135, 2216, 2297, 2429, 2456, 2459, 2540, 2621, 2702, 2783
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
Transpose[SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 9], {3, 2}]>0, 1, 0], {n, 3000}], {1, 0}]][[1]] (* The program uses the SequencePosition and SequenceCount functions from Mathematica version 10.1 *) (* Harvey P. Dale, Apr 13 2015 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|