login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A046472 Palindromic primes in base 10 and base 2. 0
3, 5, 7, 313, 7284717174827, 390714505091666190505417093 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

Table of n, a(n) for n=1..6.

P. De Geest, World!Of Palindromic Primes

MATHEMATICA

Select[Prime[Range[10!]], IntegerDigits[#]==Reverse[IntegerDigits[#]] && IntegerDigits[#, 2]==Reverse[IntegerDigits[#, 2]]&] (* Vladimir Joseph Stephan Orlovsky, Dec 30 2010 *)

p = Sort[Reap[Do[d=IntegerDigits[n]; p1=FromDigits[Join[Most[d], Reverse[d]]]; p2=FromDigits[Join[d, Reverse[d]]]; If[IntegerDigits[p1, 2] == Reverse[IntegerDigits[p1, 2]], Sow[p1]]; If[IntegerDigits[p2, 2] == Reverse[IntegerDigits[p2, 2]], Sow[p2]], {n, 0, 9999999}]][[2, 1]]]; Select[p, PrimeQ]

CROSSREFS

Cf. A002385 (palindromic primes), A007632 (palindromes in bases 2 and 10).

Sequence in context: A082756 A268693 A068832 * A065824 A191546 A069463

Adjacent sequences:  A046469 A046470 A046471 * A046473 A046474 A046475

KEYWORD

nonn,hard,base

AUTHOR

Patrick De Geest, Aug 15 1998

EXTENSIONS

a(6) (from A007632) added by T. D. Noe, Dec 31 2010

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy .

Last modified June 29 05:29 EDT 2017. Contains 288859 sequences.