login
A098393
Prime(n)+Log2(Log2(prime(n))), where Log2=A000523.
3
2, 3, 6, 8, 12, 14, 19, 21, 25, 31, 33, 39, 43, 45, 49, 55, 61, 63, 69, 73, 75, 81, 85, 91, 99, 103, 105, 109, 111, 115, 129, 133, 139, 141, 151, 153, 159, 165, 169, 175, 181, 183, 193, 195, 199, 201, 213, 225, 229, 231, 235, 241, 243, 253, 260, 266, 272, 274, 280
OFFSET
1,1
COMMENTS
a(n) = A000040(n) + A098391(n).
EXAMPLE
a(10) = A000040(10) + A098391(10) = 29 + 2 = 31.
MATHEMATICA
#+Floor[Log[2, Floor[Log[2, #]]]]&/@Prime[Range[60]] (* Harvey P. Dale, May 07 2017 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Reinhard Zumkeller, Sep 06 2004
STATUS
approved