OFFSET
1,1
COMMENTS
a(n) is an integer multiple of 6. - Alois P. Heinz, Jan 04 2009
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
EXAMPLE
n=6, 5n-1=29, 5n+1=31; n=30, 5n-1=149, 5n+1=151.
MAPLE
a:= proc(n::posint) option remember; local m; if n=1 then 6 else for m from a(n-1)+6 by 6 while not (isprime(5*m-1) and isprime(5*m+1)) do od; m fi end: seq(a(n), n=1..100); # Alois P. Heinz, Jan 04 2009
MATHEMATICA
Select[Range[0, 100001], PrimeQ[5#-1]&& PrimeQ[5#+1]&] (* Vincenzo Librandi, Jul 31 2012 *)
PROG
(Magma) [ n: n in [0..2000] | IsPrime(5*n-1) and IsPrime(5*n+1)]; // Vincenzo Librandi, Jul 31 2012
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Vincenzo Librandi, Jan 03 2009
EXTENSIONS
Corrected and extended by Alois P. Heinz and R. J. Mathar, Jan 04 2009
STATUS
approved