|
|
A043946
|
|
Numbers k such that 2 and 4 occur juxtaposed in the base-8 representation of k but not of k+1.
|
|
0
|
|
|
20, 34, 84, 98, 148, 167, 212, 226, 279, 290, 340, 354, 404, 418, 468, 482, 532, 546, 596, 610, 660, 679, 724, 738, 791, 802, 852, 866, 916, 930, 980, 994, 1044, 1058, 1108, 1122, 1172, 1191, 1236, 1250, 1343, 1364, 1378, 1428
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 8], {2, 4}]>0 || SequenceCount[IntegerDigits[n, 8], {4, 2}]>0, 1, 0], {n, 1500}], {1, 0}][[All, 1]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Jul 25 2020 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|