OFFSET
1,5
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
FORMULA
a(n) <= min(a(4*n+k): 0 <= k < 4). [Reinhard Zumkeller, Jul 31 2011]
MAPLE
LPS:= proc(L) local nL, n, i;
nL:= nops(L);
for n from nL to 1 by -1 do
for i from 1 to nL-n+1 do
if L[i..i+n-1] = ListTools:-Reverse(L[i..i+n-1]) then return n fi
od od:
end proc:
seq(LPS(convert(n, base, 4)), n=1..100); # Robert Israel, Dec 17 2020
CROSSREFS
KEYWORD
nonn,base
AUTHOR
STATUS
approved