|
|
A044168
|
|
Numbers n such that string 4,2 occurs in the base 7 representation of n but not of n-1.
|
|
0
|
|
|
30, 79, 128, 177, 210, 226, 275, 324, 373, 422, 471, 520, 553, 569, 618, 667, 716, 765, 814, 863, 896, 912, 961, 1010, 1059, 1108, 1157, 1206, 1239, 1255, 1304, 1353, 1402, 1451, 1470, 1549, 1582, 1598, 1647, 1696, 1745, 1794
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
Table of n, a(n) for n=1..42.
|
|
MATHEMATICA
|
SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 7], {4, 2}]>0, 1, 0], {n, 2000}], {0, 1}][[All, 2]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Aug 17 2019 *)
|
|
CROSSREFS
|
Sequence in context: A045560 A159219 A098998 * A044549 A353176 A155461
Adjacent sequences: A044165 A044166 A044167 * A044169 A044170 A044171
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
Clark Kimberling
|
|
STATUS
|
approved
|
|
|
|