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.

Previous Showing 11-20 of 40 results. Next

A054838 Fifth term of weak prime septet: p(m-3)-p(m-4) < p(m-2)-p(m-3) < p(m-1)-p(m-2) < p(m)-p(m-1) < p(m+1)-p(m) < p(m+2)-p(m+1).

Original entry on oeis.org

15401, 64951, 68227, 68917, 129001, 129011, 143537, 154111, 158029, 192407, 221737, 222437, 244493, 249763, 285343, 318701, 337301, 354391, 357883, 374219, 385417, 394747, 402601, 402613, 419623, 439199, 441953, 448421, 457421, 457697, 458219, 482527, 528001
Offset: 1

Views

Author

Henry Bottomley, Apr 10 2000

Keywords

Crossrefs

Cf. A051635; A054800 .. A054803: members of balanced prime quartets (= consecutive primes in arithmetic progression); A054804 .. A054818: members of strong prime quartet, quintet, sextet; A054819 .. A054840: members of weak prime quartet, quintet, sextet, septets.

Programs

  • Mathematica
    Select[Partition[Prime[Range[7000]],7,1],Min[Differences[#,2]]>0&][[All,5]] (* Harvey P. Dale, Oct 15 2016 *)

Formula

a(n) = A151800(A054837(n)) = A151799(A054839(n)), A151800 = nextprime, A151799 = prevprime; A054838 = { m = A054831(n) | m = nextprime(A054831(n-1)) }. - M. F. Hasler, Oct 27 2018

Extensions

More terms from Harvey P. Dale, Oct 15 2016

A054801 Second term of balanced prime quartets: p(m)-p(m-1) = p(m+1)-p(m) = p(m+2)-p(m+1).

Original entry on oeis.org

257, 1747, 3307, 5107, 5387, 6317, 6367, 12647, 13457, 14747, 15797, 15907, 17477, 18217, 19477, 23327, 26177, 30097, 30637, 53617, 56087, 62207, 63697, 71347, 74471, 75527, 76561, 77557, 78797, 80917, 82787, 83437, 84437, 89107, 89387
Offset: 1

Views

Author

Henry Bottomley, Apr 10 2000

Keywords

Crossrefs

Programs

  • Mathematica
    Transpose[Select[Partition[Prime[Range[9000]],4,1],Length[ Union[ Differences[#]]] == 1&]][[2]] (* Harvey P. Dale, Oct 22 2013 *)

A054809 Second term of strong prime 5-tuples: p(m)-p(m-1) > p(m+1)-p(m) > p(m+2)-p(m+1) > p(m+3)-p(m+2).

Original entry on oeis.org

1657, 1777, 1847, 1861, 1987, 2371, 2459, 2503, 2521, 3433, 3449, 4201, 4507, 5261, 5407, 5431, 6029, 6637, 7229, 7283, 7741, 7867, 7919, 8147, 8501, 9587, 9601, 11027, 11369, 11579, 11821, 12391, 13859, 14813, 15121, 15527, 16033, 16301, 16811, 17011, 17377
Offset: 1

Views

Author

Henry Bottomley, Apr 10 2000

Keywords

Comments

Initial member of pairs of consecutive primes in A054805 (second of quadruples): The first 10^4 terms of that sequence yield over 2000 terms of this sequence. - M. F. Hasler, Oct 27 2018

Crossrefs

Cf. A051634, A051635; A054800 .. A054803: members of balanced prime quadruples (= 4 consecutive primes in arithmetic progression); A054804 .. A054818: members of strong prime 4-tuples, 5-tuples, 6-tuples; A054819 .. A054840: members of weak prime 4-tuples, ..., 7-tuples.

Programs

  • Mathematica
    spqQ[n_]:=Module[{difs=Differences[n]},difs[[1]]>difs[[2]]> difs[[3]]> difs[[4]]]; Transpose[Select[Partition[Prime[ Range[2000]],5,1], spqQ]][[2]] (* Harvey P. Dale, May 06 2012 *)

Formula

a(n) = nextprime(A054808(n)) = prevprime(A054810(n)), nextprime = A151800, prevprime = A151799; A054809 = {m = A054805(n) | nextprime(m) = A054805(n+1)}. - M. F. Hasler, Oct 27 2018

Extensions

Corrected by Harvey P. Dale, May 06 2012
Edited and offset corrected to 1 by M. F. Hasler, Oct 27 2018

A054810 Third term of strong prime 5-tuples: p(m-1)-p(m-2) > p(m)-p(m-1) > p(m+1)-p(m) > p(m+2)-p(m+1).

Original entry on oeis.org

1663, 1783, 1861, 1867, 1993, 2377, 2467, 2521, 2531, 3449, 3457, 4211, 4513, 5273, 5413, 5437, 6037, 6653, 7237, 7297, 7753, 7873, 7927, 8161, 8513, 9601, 9613, 11047, 11383, 11587, 11827, 12401, 13873, 14821, 15131, 15541, 16057, 16319
Offset: 1

Views

Author

Henry Bottomley, Apr 10 2000

Keywords

Crossrefs

Cf. A051634, A051635; A054800 .. A054803: members of balanced prime quadruples (= 4 consecutive primes in arithmetic progression); A054804 .. A054818: members of strong prime 4-tuples, 5-tuples, 6-tuples; A054819 .. A054840: members of weak prime 4-tuples, ..., 7-tuples.

Programs

  • Mathematica
    spqQ[{a_,b_,c_,d_,e_}]:=(b-a)>(c-b)>(d-c)>(e-d); Transpose[ Select[ Partition[ Prime[ Range[2000]],5,1],spqQ]][[3]] (* Harvey P. Dale, Feb 25 2013 *)

Extensions

Edited and offset corrected to 1 by M. F. Hasler, Oct 27 2018

A054828 First term of weak prime sextet: p(m+1)-p(m) < p(m+2)-p(m+1) < p(m+3)-p(m+2) < p(m+4)-p(m+3) < p(m+5)-p(m+4).

Original entry on oeis.org

2903, 13463, 13901, 14947, 15373, 15377, 21397, 21557, 21859, 28277, 30869, 33199, 35591, 37691, 42221, 42569, 45821, 55661, 64661, 64919, 64921, 68207, 68209, 68897, 68899, 73939, 74201, 78577, 83089, 85513, 87313, 88001, 90907
Offset: 1

Views

Author

Henry Bottomley, Apr 10 2000

Keywords

Crossrefs

Programs

  • Mathematica
    Transpose[Select[Partition[Prime[Range[9000]],6,1],AllTrue[ Differences[ #,2], Positive]&]] [[1]] (* The program uses the AllTrue function from Mathematica version 10 *) (* Harvey P. Dale, Dec 12 2014 *)

A054832 Fifth term of weak prime sextet: p(m-3)-p(m-4) < p(m-2)-p(m-3) < p(m-1)-p(m-2) < p(m)-p(m-1) < p(m+1)-p(m).

Original entry on oeis.org

2939, 13499, 13921, 14983, 15401, 15413, 21433, 21577, 21893, 28297, 30911, 33247, 35617, 37747, 42257, 42611, 45841, 55681, 64693, 64951, 64969, 68227, 68239, 68917, 68927, 73973, 74231, 78623, 83137, 85549, 87359, 88037, 90947
Offset: 1

Views

Author

Henry Bottomley, Apr 10 2000

Keywords

Crossrefs

Programs

  • Mathematica
    Select[Partition[Prime[Range[8800]],6,1],Min[Differences[#,2]]>0&][[All,5]] (* Harvey P. Dale, Feb 22 2020 *)

A054836 Third term of weak prime septet: p(m-1)-p(m-2) < p(m)-p(m-1) < p(m+1)-p(m) < p(m+2)-p(m+1) < p(m+3)-p(m+2) < p(m+4)-p(m+3).

Original entry on oeis.org

15383, 64927, 68213, 68903, 128987, 128993, 143519, 154087, 158009, 192383, 221723, 222403, 244471, 249737, 285301, 318683, 337283, 354377, 357839, 374189, 385397, 394733, 402587, 402593, 419603, 439171, 441923, 448387, 457403, 457679, 458197, 482513, 527987, 529819, 577537, 582767
Offset: 1

Views

Author

Henry Bottomley, Apr 10 2000

Keywords

Crossrefs

Cf. A051635; A054800 .. A054803: members of balanced prime quartets (= 4 consecutive primes in arithmetic progression); A054804 .. A054818: members of strong prime quartet, quintet, sextet; A054819 .. A054840: members of weak prime quartet, quintet, sextet, septets.

Formula

a(n) = A151800(A054835(n)) = A151799(A054838(n)), A151800 = nextprime, A151799 = prevprime; A054836 = { m = A054829(n) | m = nextprime(A054829(n-1)) }. - M. F. Hasler, Oct 27 2018

Extensions

More terms from M. F. Hasler, Oct 27 2018

A054839 Sixth term of weak prime septet: p(m-4)-p(m-5) < p(m-3)-p(m-4) < p(m-2)-p(m-3) < p(m-1)-p(m-2) < p(m)-p(m-1) < p(m+1)-p(m).

Original entry on oeis.org

15413, 64969, 68239, 68927, 129011, 129023, 143551, 154127, 158047, 192431, 221747, 222461, 244507, 249779, 285377, 318713, 337313, 354401, 357913, 374239, 385433, 394759, 402613, 402631, 419651, 439217, 441971, 448451, 457433, 457711, 458239, 482539, 528013
Offset: 1

Views

Author

Henry Bottomley, Apr 10 2000

Keywords

Crossrefs

Cf. A051635; A054800 .. A054803: members of balanced prime quartets (= consecutive primes in arithmetic progression); A054804 .. A054818: members of strong prime quartets, quintets, sextets; A054819 .. A054840: members of weak prime quartets, quintets, sextets, septets.

Programs

  • Mathematica
    Transpose[Select[Partition[Prime[Range[50000]],7,1],Min[ Differences[ #,2]]> 0&]][[6]] (* Harvey P. Dale, Sep 27 2015 *)

Formula

a(n) = A151800(A054838(n)) = A151799(A054840(n)), A054839 = { m = A054832(n) | m = A151800(A054832(n-1)) } (A151800: nextprime, A151799: prevprime). - M. F. Hasler, Oct 27 2018

Extensions

More terms from Harvey P. Dale, Sep 27 2015

A054811 Fourth term of strong prime quintets: p(m-2)-p(m-3) > p(m-1)-p(m-2) > p(m)-p(m-1) > p(m+1)-p(m).

Original entry on oeis.org

1667, 1787, 1867, 1871, 1997, 2381, 2473, 2531, 2539, 3457, 3461, 4217, 4517, 5279, 5417, 5441, 6043, 6659, 7243, 7307, 7757, 7877, 7933, 8167, 8521, 9613, 9619, 11057, 11393, 11593, 11831, 12409, 13877, 14827, 15137, 15551, 16061, 16333
Offset: 1

Views

Author

Henry Bottomley, Apr 10 2000

Keywords

Comments

First member of pairs of consecutive primes in A054807 (4th of strong prime quartets). - M. F. Hasler, Oct 27 2018

Crossrefs

Cf. A051634, A051635; A054800 .. A054803: members of balanced prime quartets (= 4 consecutive primes in arithmetic progression); A054804 .. A054818: members of strong prime quartets, quintets, sextets; A054819 .. A054840: members of weak prime quartets, quintets, sextets, septets.

Formula

a(n) = nextprime(A054810(n)) = prevprime(A054812(n)), nextprime = A151800, prevprime = A151799; A054811 = {m = A054807(n) | nextprime(m) = A054807(n+1)}. - M. F. Hasler, Oct 27 2018

A054812 Fifth term of strong prime quintets: p(m-3)-p(m-4) > p(m-2)-p(m-3) > p(m-1)-p(m-2) > p(m)-p(m-1).

Original entry on oeis.org

1669, 1789, 1871, 1873, 1999, 2383, 2477, 2539, 2543, 3461, 3463, 4219, 4519, 5281, 5419, 5443, 6047, 6661, 7247, 7309, 7759, 7879, 7937, 8171, 8527, 9619, 9623, 11059, 11399, 11597, 11833, 12413, 13879, 14831, 15139, 15559, 16063, 16339
Offset: 1

Views

Author

Henry Bottomley, Apr 10 2000

Keywords

Comments

Second member of pairs of consecutive primes in A054807 (4th term of strong prime quartets). - M. F. Hasler, Oct 27 2018

Crossrefs

Cf. A051634, A051635; A054800 .. A054803: members of balanced prime quartets (= 4 consecutive primes in arithmetic progression); A054804 .. A054818: members of strong prime quartets, quintets, sextets; A054819 .. A054840: members of weak prime quartets, quintets, sextets, septets.

Programs

  • Mathematica
    spqQ[c_]:=Module[{d=Differences[c]},d[[1]]>d[[2]]>d[[3]]>d[[4]]]; Transpose[ Select[Partition[Prime[Range[2000]],5,1],spqQ]][[5]] (* Harvey P. Dale, Jan 01 2013 *)

Formula

a(n) = nextprime(A054811(n)); A054811 = {m = A054807(n) | prevprime(m) = A054807(n-1)}; nextprime = A151800, prevprime = A151799. - M. F. Hasler, Oct 27 2018
Previous Showing 11-20 of 40 results. Next