|
|
A043912
|
|
Numbers k such that 0 and 2 occur juxtaposed in the base-7 representation of k but not of k+1.
|
|
0
|
|
|
14, 51, 63, 104, 112, 149, 161, 198, 210, 247, 259, 296, 308, 345, 363, 394, 406, 447, 455, 492, 504, 541, 553, 590, 602, 639, 651, 734, 737, 749, 790, 798, 835, 847, 884, 896, 933, 945, 982, 994, 1031, 1049, 1080, 1092, 1133
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 7], {0, 2}]>0 || SequenceCount[IntegerDigits[n, 7], {2, 0}]>0, 1, 0], {n, 1200}], {1, 0}][[All, 1]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Jun 13 2020 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|