OFFSET
1,1
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
MAPLE
for i from 1 to 232 do if ithprime(i+1) = ithprime(i) + 4 then print({ithprime(i+1)}); fi; od; # Zerinvary Lajos, Mar 19 2007
MATHEMATICA
Select[Partition[Prime[Range[250]], 2, 1], #[[2]]-#[[1]]==4&][[All, 2]] (* Harvey P. Dale, Feb 02 2023 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
EXTENSIONS
Corrected and extended by Henry Bottomley, Jul 18 2000
Definition clarified by Harvey P. Dale, Feb 02 2023
STATUS
approved