A098390 Prime(n)+Log2(prime(n)), where Log2=A000523.

3, 4, 7, 9, 14, 16, 21, 23, 27, 33, 35, 42, 46, 48, 52, 58, 64, 66, 73, 77, 79, 85, 89, 95, 103, 107, 109, 113, 115, 119, 133, 138, 144, 146, 156, 158, 164, 170, 174, 180, 186, 188, 198, 200, 204, 206, 218, 230, 234, 236, 240, 246, 248, 258, 265, 271, 277, 279

Offset

1,1

Comments

a(n) = A000040(n) + A098388(n).

Links

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

Example

a(10) = A000040(10) + A098388(10) = 29 + 4 = 33.

Mathematica

#+Floor[Log[2, #]]&/@Prime[Range[60]] (* Harvey P. Dale, Dec 30 2011 *)

Crossrefs

Cf. A098389, A014688, A098387, A098393.

Sequence in context: A349360 A103054 A140208 * A266769 A008763 A349795

Adjacent sequences: A098387 A098388 A098389 * A098391 A098392 A098393

Keyword

nonn

Author

Reinhard Zumkeller, Sep 06 2004

Status

approved