OFFSET
1,1
COMMENTS
LINKS
Karl V. Keller, Jr., Table of n, a(n) for n = 1..100000
Eric Weisstein's World of Mathematics, Prime Quadruplet.
Eric Weisstein's World of Mathematics, Twin Primes
Wikipedia, Twin prime
EXAMPLE
For n = 17, the numbers 17, 19, 41, 43 are primes.
MATHEMATICA
a245568[n_] := Select[Prime@ Range@ n, And[PrimeQ[# + 2], PrimeQ[# + 24], PrimeQ[# + 26]] &]; a245568[5000] (* Michael De Vlieger, Jan 11 2015 *)
PROG
(Python)
from sympy import isprime
for n in range(1, 10000001, 2):
..if isprime(n) and isprime(n+2) and isprime(n+24) and isprime(n+26): print(n, end=', ')
CROSSREFS
KEYWORD
nonn
AUTHOR
Karl V. Keller, Jr., Jan 09 2015
STATUS
approved