A046290 Numbers k such that 2^k contains 2^4=16 as its largest proper substring of the form 2^m (probably finite).

14, 24, 40, 44, 62, 64, 70, 75, 81, 84, 98, 99, 114, 117, 122, 127, 133, 134, 140, 159, 167, 175, 184, 188, 189, 190, 200, 212, 215, 232, 234, 273, 274, 282, 292, 300, 318, 348, 377, 440, 516, 527, 620

Offset

1,1

Links

Table of n, a(n) for n=1..43.

Example

2^14 = {16}384;
2^24 = {16}7772{16};
2^40 = 109951{16}27776.

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[#] == 4 &] (* Giovanni Resta, Oct 14 2019 *)

Crossrefs

Cf. A033921.

Sequence in context: A106699 A111455 A171124 * A111743 A164399 A164404

Adjacent sequences: A046287 A046288 A046289 * A046291 A046292 A046293

Keyword

nonn,base

Author

Patrick De Geest, Jun 15 1998

Status

approved