A185269 The subsequence of primes, in order of occurrence, in A005351.

7, 5, 31, 29, 19, 17, 23, 107, 109, 97, 103, 101, 127, 113, 73, 79, 67, 71, 89, 83, 431, 419, 421, 443, 433, 439, 397, 389, 409, 401, 491, 487, 509, 499, 503, 457, 463, 461, 449, 479, 467, 293, 313, 317, 307, 311, 271, 269, 257, 263, 283, 281, 277, 367, 353, 359, 379

Offset: 1

Author

Jonathan Vos Post, Feb 19 2011

Keywords

• base
• easy
• nonn

Comments

A005351(n) is a representation of n obtained by converting n to the base(-2) representation, interpreting this as a binary, base(+2), number, and converting back to decimal.

Links

• G. C. Greubel, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A000040, A005351.

Programs

Mathematica

f[n_] := Module[{t = 2 (4^Floor[Log[4, Abs[n] + 1] + 2] - 1)/3}, BitXor[n + t, t]]; Select[Array[f, 300], PrimeQ] (* Robert G. Wilson v, Feb 21 2011 *)