A061716 Binary order of n-th prime.
1, 2, 3, 3, 4, 4, 5, 5, 5, 5, 5, 6, 6, 6, 6, 6, 6, 6, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 10, 10, 10, 10, 10
Offset: 1
Keywords
Links
- Harry J. Smith, Table of n, a(n) for n = 1..2000
Programs
-
Mathematica
Ceiling[Log2[Prime[Range[110]]]] (* Harvey P. Dale, Apr 12 2023 *)
-
PARI
a(n) = { logint(prime(n)-1, 2) + 1 } \\ Harry J. Smith, Jul 26 2009
Extensions
Offset changed from 0 to 1 by Harry J. Smith, Jul 26 2009
Comments