login
A244114
Prime lucky numbers that are palindromic in base 2.
1
3, 7, 31, 73, 127, 1831, 1879, 5869, 6211, 8191, 19609, 25939, 28123, 86293, 86677, 88117, 97213, 98563, 98947, 115783, 131071, 268993, 287281, 296713, 321721, 354997, 456571, 505711, 514783, 524287, 1096609, 1199689, 1242601, 1415989, 1420981, 1488301, 1672243, 1741099, 1851271
OFFSET
1,1
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..311 (terms 1..71 from Robert G. Wilson v)
MATHEMATICA
nn = 10^7; t = Range[1, nn, 2]; sieve[n_] := Module[{k = t[[n]]}, t = Delete[t, Table[{i}, {i, k, Length[t], k}]]]; n = 1; While[ t[[n]] < Length[t], n++; sieve[n]]; palQ[n_Integer, base_Integer] := Module[{idn = IntegerDigits[n, base]}, idn == Reverse[ idn]]; Select[t, PrimeQ@# && palQ[#, 2] &]
CROSSREFS
Intersection of A000040, A000959 & A006995.
Cf. A031881.
Sequence in context: A261862 A373581 A226216 * A072881 A257924 A358341
KEYWORD
nonn,base
AUTHOR
Robert G. Wilson v, Jun 20 2014
STATUS
approved