|
|
A044890
|
|
Base-4 run lengths alternate: even, odd, even,...
|
|
1
|
|
|
5, 10, 15, 20, 22, 23, 40, 41, 43, 60, 61, 62, 85, 170, 255, 320, 325, 330, 335, 340, 342, 343, 352, 357, 362, 367, 368, 373, 378, 383, 640, 645, 650, 655, 656, 661, 666, 671, 680, 681, 683, 688, 693, 698, 703, 960, 965, 970, 975
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
eoe4Q[n_]:=Module[{c=If[EvenQ[Length[#]], 1, 0]&/@Split[ IntegerDigits[ n, 4]]}, c==PadRight[{}, Length[c], {1, 0}]]; Select[Range[1000], eoe4Q] (* Harvey P. Dale, Jun 01 2021 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|