OFFSET
1,1
COMMENTS
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
EXAMPLE
359 is in the sequence because it is a Sophie Germain prime and its reversal 953 is also a Sophie Germain prime.
MATHEMATICA
Select[Prime[Range[10000]], PrimeQ[2*# + 1] && PrimeQ[FromDigits[Reverse[ IntegerDigits[ # ]]]] && PrimeQ[2*FromDigits[Reverse[IntegerDigits[ # ]]] + 1] &] (* Stefan Steinerberger, May 18 2008 *)
fQ[n_] := (rp = FromDigits@ Reverse@ IntegerDigits@n; PrimeQ[2n + 1] && PrimeQ[rp] && PrimeQ[2rp + 1]); Select[Prime@ Range@4093, fQ@# &] (* Robert G. Wilson v, May 09 2006 *)
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Luc Stevens (lms022(AT)yahoo.com), May 07 2006
EXTENSIONS
More terms from Robert G. Wilson v and Adam Panagos (adam.panagos(AT)gmail.com), May 09 2006
Edited by N. J. A. Sloane, Mar 02 2009 at the suggestion of R. J. Mathar
STATUS
approved