A098386 - OEIS

%I #7 Jun 26 2022 03:27:31

%S 2,2,4,5,9,11,15,16,20,26,28,34,38,40,44,49,55,57,63,67,69,75,79,85,

%T 93,97,99,103,105,109,123,126,132,134,144,146,152,158,162,168,174,176,

%U 186,188,192,194,206,218,222,224,228,234,236,246,252,258,264,266,272,276

%N a(n) = prime(n)-Log2(n), where Log2 = A000523.

%e a(10) = A000040(10) - A000523(10) = 29 - 3 = 26.

%t Table[Prime[n]-Floor[Log2[n]],{n,60}] (* _Harvey P. Dale_, Nov 20 2021 *)

%Y Cf. A000040, A000523, A098387, A014689, A098389, A098392.

%K nonn

%O 1,1

%A _Reinhard Zumkeller_, Sep 06 2004