|
| |
|
|
A016041
|
|
Primes that are palindromic in base 2 (but written here in base 10).
|
|
16
| |
|
|
3, 5, 7, 17, 31, 73, 107, 127, 257, 313, 443, 1193, 1453, 1571, 1619, 1787, 1831, 1879, 4889, 5113, 5189, 5557, 5869, 5981, 6211, 6827, 7607, 7759, 7919, 8191, 17377, 18097, 18289, 19433, 19609, 19801, 21157, 22541, 22669, 22861, 23581, 24029
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
LINKS
| Zak Seidov, Table of n, a (n) for n = 1..1000
K. S. Brown, On General Palindromic Numbers
P. De Geest, World!Of Palindromic Primes
|
|
|
MATHEMATICA
| lst = {}; Do[ If[ PrimeQ@n, t = IntegerDigits[n, 2]; If[ FromDigits@t == FromDigits@ Reverse@ t, AppendTo[lst, n]]], {n, 3, 50000, 2}]; lst
|
|
|
CROSSREFS
| Intersection of A000040 & A006995. First row of A095749. A095741 gives the number of terms in range [2^(2n), 2^(2n+1)]. Cf. A095730 for primes whose Zeckendorf-expansion is palindromic and A029971 for those whose ternary (base-3) expansion is.
Sequence in context: A002092 A174394 A057476 * A140797 A038893 A191064
Adjacent sequences: A016038 A016039 A016040 * A016042 A016043 A016044
|
|
|
KEYWORD
| nonn,easy,base
|
|
|
AUTHOR
| Robert G. Wilson v (rgwv(AT)rgwv.com)
|
|
|
EXTENSIONS
| More terms from Patrick De Geest (pdg(AT)worldofnumbers.com).
More terms from Antti Karttunen (Antti.Karttunen(AT)iki.fi), Jun 12 2004
I corrected the syntax of the Mathematica coding Robert G. Wilson v (rgwv(AT)rgwv.com), Aug 10 2009
|
| |
|
|
