OFFSET
1,1
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000 (terms 1..1000 from Harvey P. Dale)
EXAMPLE
191 is in the sequence because it is a Sophie Germain prime and the sum of its digits 1+9+1 = 11 is also a Sophie Germain prime.
MATHEMATICA
sgpQ[n_]:=Module[{c=Total[IntegerDigits[n]]}, And@@PrimeQ[{2n+1, c, 2c+1}]]; Select[Prime[Range[1000]], sgpQ] (* Harvey P. Dale, Oct 14 2012 *)
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Luc Stevens (lms022(AT)yahoo.com), May 06 2006; corrected May 12 2006
EXTENSIONS
Corrected by T. D. Noe, Oct 25 2006
Corrected by Harvey P. Dale, Oct 14 2012
STATUS
approved