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,1

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

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 *)

Crossrefs

Cf. A000040, A005351.

Sequence in context: A059990 A213246 A213243 * A344917 A328758 A070426

Adjacent sequences: A185266 A185267 A185268 * A185270 A185271 A185272

Keyword

base,easy,nonn

Author

Jonathan Vos Post, Feb 19 2011

Status

approved