OFFSET
1,1
COMMENTS
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
EXAMPLE
For p=5, p+6=11, (5,11); p=7, p+6=13, (7,13); p=11, p+6=17, (11,17)
MATHEMATICA
Flatten[Select[{#, # + 6}&/@Prime[Range[100]], PrimeQ[Last[#]]&]] (* Vincenzo Librandi, Apr 06 2013 *)
CROSSREFS
KEYWORD
nonn,tabf
AUTHOR
Vincenzo Librandi, Feb 07 2009
STATUS
approved