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.

A061779 Primes p such that q-p = 22, where q is the next prime after p.

This page as a plain text file.
%I A061779 #23 Jan 27 2023 05:55:52
%S A061779 1129,1951,2311,2557,3229,3469,3739,3967,4027,5449,6427,7129,8017,
%T A061779 9349,9439,9697,10039,10111,10369,10567,11329,11527,12049,12301,13729,
%U A061779 13807,14221,14347,15031,15937,17137,17209,17761,18097,18979,19819,19867,19891
%N A061779 Primes p such that q-p = 22, where q is the next prime after p.
%C A061779 Smaller of 2 consecutive primes with a difference of 22: primes p such that p+22 is the next prime.
%H A061779 Remi Eismann, <a href="/A061779/b061779.txt">Table of n, a(n) for n = 1..10000</a>
%H A061779 K. Soundararajan, <a href="https://doi.org/10.1090/S0273-0979-06-01142-6">Small gaps between prime numbers: the work of Goldston-Pintz-Yildirim</a>, Bull. Amer. Math. Soc., 44 (2007), 1-18.
%H A061779 <a href="/index/Pri#gaps">Index entries for primes, gaps between</a>
%e A061779 1129 is a term as the next prime is 1151.
%t A061779 Transpose[Select[Partition[Prime[Range[2300]], 2, 1], Last[#] - First[#] == 22 &]][[1]] (* _Bruno Berselli_, Apr 09 2013 *)
%t A061779 r = Prime@Range@2300; r[[Flatten@Position[Differences@r, 22]]] (* _Hans Rudolf Widmer_, Jan 21 2023 *)
%o A061779 (PARI) { n=0; p=2; forprime (q=3, 457043, if ((q - p)==22, write("b061779.txt", n++, " ", p)); p=q ) } \\ _Harry J. Smith_, Jul 27 2009
%o A061779 (Magma) [p: p in PrimesUpTo(20000) | NextPrime(p)-p eq 22]; // _Bruno Berselli_, Apr 09 2013
%K A061779 nonn
%O A061779 1,1
%A A061779 _Amarnath Murthy_, May 23 2001
%E A061779 Corrected and extended by _Patrick De Geest_, May 26 2001
%E A061779 Entry revised by _N. J. A. Sloane_, Jan 26 2007