OFFSET
1,2
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
FORMULA
a(n) = min(a(4*n),a(4*n+1),a(4*n+2),a(4*n+3)). - Robert Israel, Jun 27 2018
MAPLE
B:= cat("", op(map(op, [seq(ListTools[Reverse](convert(2*n-1, base, 4)), n=1..500)]))):
g:= proc(n) local L, ns;
L:= convert(n, base, 4);
ns:= cat("", seq(L[-i], i=1..nops(L)));
StringTools:-Search(ns, B);
end proc:
A:= NULL:
for n from 1 do
v:= g(n);
if v = 0 then break fi;
A:= A, v;
od:
A; # Robert Israel, Jun 27 2018
CROSSREFS
KEYWORD
nonn,look
AUTHOR
STATUS
approved