cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A078561 p, p+4 and p+10 are consecutive primes.

This page as a plain text file.
%I A078561 #20 Mar 24 2018 17:32:54
%S A078561 19,43,79,127,163,229,349,379,439,499,643,673,937,967,1009,1093,1213,
%T A078561 1279,1429,1489,1549,1597,1609,2203,2347,2389,2437,2539,2689,2833,
%U A078561 2953,3079,3319,3529,3613,3793,3907,3919,4003,4129,4447,4639,4789,4933,4999
%N A078561 p, p+4 and p+10 are consecutive primes.
%C A078561 Subsequence of A029710. - _R. J. Mathar_, May 06 2017
%H A078561 R. J. Mathar, <a href="/A078561/b078561.txt">Table of n, a(n) for n = 1..1000</a>
%e A078561 Between p and p+10 [46] difference-pattern: 19(4)23(6)29;
%t A078561 Select[Prime@ Range[10^3], Differences@ NestList[NextPrime, #, 2] == {4, 6} &] (* _Michael De Vlieger_, May 06 2017 *)
%t A078561 Select[Partition[Prime[Range[700]],3,1],Differences[#]=={4,6}&][[All,1]] (* _Harvey P. Dale_, Mar 24 2018 *)
%o A078561 (PARI) isok(p) = isprime(p) && (nextprime(p+1) == p+4) && (nextprime(p+5) == p+10); \\ _Michel Marcus_, Dec 20 2013
%o A078561 (PARI) is(n)=isprime(n) && isprime(n+4) && isprime(n+10) && !isprime(n+6) && n>3 \\ _Charles R Greathouse IV_, Dec 20 2013
%Y A078561 Cf. analogous inter-prime d-patterns with d<=6: A022004[24], A022005[42], A049437[26], A049438[62], A078561[46], A078562[64], A047948[66].
%K A078561 nonn
%O A078561 1,1
%A A078561 _Labos Elemer_, Dec 10 2002