|
|
A044282
|
|
Numbers n such that string 3,4 occurs in the base 9 representation of n but not of n-1.
|
|
0
|
|
|
31, 112, 193, 274, 279, 355, 436, 517, 598, 679, 760, 841, 922, 1003, 1008, 1084, 1165, 1246, 1327, 1408, 1489, 1570, 1651, 1732, 1737, 1813, 1894, 1975, 2056, 2137, 2218, 2299, 2380, 2461, 2466, 2511, 2623, 2704, 2785
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
Flatten[Position[Partition[Table[If[MemberQ[Partition[ IntegerDigits[ n, 9], 2, 1], {3, 4}], 1, 0], {n, 3000}], 2, 1], {0, 1}]]+1 (* Harvey P. Dale, Feb 25 2015 *)
SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 9], {3, 4}]>0, 1, 0], {n, 3000}], {0, 1}][[All, 2]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Aug 14 2019 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|