|
| |
|
|
A117697
|
|
Palindromic primes in base 2 (written in base 2).
|
|
5
| |
|
|
11, 101, 111, 10001, 11111, 1001001, 1101011, 1111111, 100000001, 100111001, 110111011, 10010101001, 10110101101, 11000100011, 11001010011, 11011111011, 11100100111, 11101010111, 1001100011001, 1001111111001, 1010001000101
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
LINKS
| Attila Olah, Table of n, a(n) for n=1..43964
Eric Weisstein: Palindromic Prime.
|
|
|
FORMULA
| a(n)=A007088[A016041(n)]. - R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Feb 25 2007
|
|
|
MAPLE
| A007088 := proc(n) local bin, dig ; bin := convert(n, base, 2) ; add( op(dig, bin)*10^(dig-1), dig=1..nops(bin) ) ; end: isA016041 := proc(n) local bin, dig ; if isprime(n) then bin := convert(n, base, 2) ; for dig from 1 to nops(bin)/2 do if op(dig, bin) <> op(-dig, bin) then RETURN(false) ; fi ; od ; RETURN(true) ; else false ; fi ; end: for i from 1 to 900 do p := ithprime(i) : if isA016041(p) then printf("%d, ", A007088(p)) ; fi ; od : - R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Feb 25 2007
|
|
|
CROSSREFS
| Cf. A016041, A002385.
Sequence in context: A193415 A057148 A076289 * A091366 A158051 A073064
Adjacent sequences: A117694 A117695 A117696 * A117698 A117699 A117700
|
|
|
KEYWORD
| nonn,base
|
|
|
AUTHOR
| Martin Renner (martin.renner(AT)gmx.net), Apr 13 2006
|
|
|
EXTENSIONS
| Keyword:base added by R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Jul 12 2009
|
| |
|
|
