OFFSET
1,1
COMMENTS
If there is a term beyond a(108)=1862 it is larger than 10^5. - Giovanni Resta, Oct 14 2019
LINKS
Giovanni Resta, Table of n, a(n) for n = 1..108
EXAMPLE
2^15 = {32}768;
2^25 = 335544{32};
2^41 = 219902{32}55552.
MATHEMATICA
sub2[n_] := Block[{s = ToString[2^n], k = n - 1}, While[k >= 0 && ! StringContainsQ[s, ToString[2^k]], k--]; k]; Select[Range[2000], sub2[#] == 5 &] (* Giovanni Resta, Oct 14 2019 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Patrick De Geest, Jun 15 1998
STATUS
approved