OFFSET
1,3
COMMENTS
Or, numbers n such that 2n+3 is a Sophie Germain prime. [Klaus Brockhaus, Dec 22 2008]
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
EXAMPLE
For n = 10, 2*n+3 = 23 is prime and 4*n+7 = 47 is prime. 23 = A005384(5).
MATHEMATICA
Join[{0}, Select[Range[1000], PrimeQ[2*#+3] && PrimeQ[4*#+7] &]] (* Vincenzo Librandi, Aug 30 2012 *)
Select[Range[0, 1000], AllTrue[{2#+3, 4#+7}, PrimeQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* Harvey P. Dale, Aug 07 2015 *)
PROG
(Magma) [ n: n in [0..1000] | IsPrime(2*n+3) and IsPrime(4*n+7) ];
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Vincenzo Librandi, Dec 14 2008
EXTENSIONS
Edited and extended by Klaus Brockhaus, Dec 22 2008
STATUS
approved