OFFSET
1,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1600
EXAMPLE
24*43-1=1031, 24*43+1=1033; 30*43-1=1289, 30*43+1=1291.
MATHEMATICA
a=24; b=30; Select[Prime[Range[14^4]], PrimeQ[a*#-1]&&PrimeQ[a*#+1]&&PrimeQ[b*#-1]&&PrimeQ[b*#+1]&]
PROG
(Magma) [p: p in PrimesUpTo(1000)| IsPrime(24*p-1) and IsPrime(24*p+1) and IsPrime(30*p-1) and IsPrime(30*p+1)]; // Vincenzo Librandi, Nov 24 2010
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Vladimir Joseph Stephan Orlovsky, May 15 2008
STATUS
approved