A004676 Primes written in base 2.
10, 11, 101, 111, 1011, 1101, 10001, 10011, 10111, 11101, 11111, 100101, 101001, 101011, 101111, 110101, 111011, 111101, 1000011, 1000111, 1001001, 1001111, 1010011, 1011001, 1100001, 1100101, 1100111, 1101011, 1101101, 1110001, 1111111, 10000011, 10001001
Offset: 1
References
- J.-P. Allouche and J. Shallit, Automatic Sequences, Cambridge Univ. Press, 2003, p. 3.
Links
- T. D. Noe, Table of n, a(n) for n = 1..1000
- Chris Caldwell, The prime pages, The first 1000 primes.
Crossrefs
Programs
-
Haskell
a004676 = a007088 . a000040 -- Reinhard Zumkeller, Aug 06 2012
-
Mathematica
FromDigits /@ IntegerDigits[ Prime[ Range[31]], 2] (* Robert G. Wilson v, Jun 30 2005 *)
-
PARI
a(n)=subst(Pol(binary(prime(n))), 'x, 10) \\ Charles R Greathouse IV, Mar 20 2013
Comments