login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A054804 First term of strong prime quartets: prime(m+1)-prime(m) > prime(m+2)-prime(m+1) > prime(m+3)-prime(m+2). 27
31, 61, 89, 211, 271, 293, 449, 467, 607, 619, 709, 743, 839, 863, 919, 1069, 1291, 1409, 1439, 1459, 1531, 1637, 1657, 1669, 1723, 1759, 1777, 1831, 1847, 1861, 1979, 1987, 2039, 2131, 2311, 2357, 2371, 2447, 2459, 2477, 2503, 2521, 2557, 2593, 2633 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,1
COMMENTS
Primes preceding the first member of pairs of consecutive primes in A051634 ("strong primes"), see example. (A051634 lists the middle member of the triplets, here we list the first member of the quadruplets.) - M. F. Hasler, Oct 27 2018, corrected thanks to Gus Wiseman, Jun 01 2020.
LINKS
FORMULA
a(n) = prime(A335278(n)). - Gus Wiseman, May 31 2020
EXAMPLE
The first 10 strictly decreasing prime gap quartets:
31 37 41 43
61 67 71 73
89 97 101 103
211 223 227 229
271 277 281 283
293 307 311 313
449 457 461 463
467 479 487 491
607 613 617 619
619 631 641 643
For example, the primes (211,223,227,229) have differences (12,4,2), which are strictly decreasing, so 211 is in the sequence.
The second and third term of each quadruplet are consecutive terms in A051634: this is a characteristic property of this sequence. - M. F. Hasler, Jun 01 2020
MAPLE
primes:= select(isprime, [seq(i, i=3..10000, 2)]):
L:= primes[2..-1]-primes[1..-2]:
primes[select(t -> L[t+2] < L[t+1] and L[t+1] < L[t], [$1..nops(L)-2])]; # Robert Israel, Jun 28 2018
MATHEMATICA
ReplaceList[Array[Prime, 100], {___, x_, y_, z_, t_, ___}/; y-x>z-y>t-z:>x] (* Gus Wiseman, May 31 2020 *)
Select[Partition[Prime[Range[400]], 4, 1], Max[Differences[#, 2]]<0&][[All, 1]] (* Harvey P. Dale, Jan 12 2023 *)
CROSSREFS
Prime gaps are A001223.
Second prime gaps are A036263.
All of the following use prime indices rather than the primes themselves:
- Strictly decreasing prime gap quartets are A335278.
- Strictly increasing prime gap quartets are A335277.
- Equal prime gap quartets are A090832.
- Weakly increasing prime gap quartets are A333383.
- Weakly decreasing prime gap quartets are A333488.
- Unequal prime gap quartets are A333490.
- Partially unequal prime gap quartets are A333491.
- Adjacent equal prime gaps are A064113.
- Strict ascents in prime gaps are A258025.
- Strict descents in prime gaps are A258026.
- Adjacent unequal prime gaps are A333214.
- Weak ascents in prime gaps are A333230.
- Weak descents in prime gaps are A333231.
Maximal weakly increasing intervals of prime gaps are A333215.
Maximal strictly decreasing intervals of prime gaps are A333252.
Sequence in context: A095672 A073650 A078562 * A128470 A195744 A331324
KEYWORD
nonn
AUTHOR
Henry Bottomley, Apr 10 2000
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified May 6 18:46 EDT 2024. Contains 372297 sequences. (Running on oeis4.)