login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A258025 Numbers k such that prime(k+2) - 2*prime(k+1) + prime(k) > 0. 18
1, 3, 5, 7, 8, 10, 13, 14, 17, 20, 22, 23, 26, 28, 29, 31, 33, 35, 38, 41, 43, 45, 49, 50, 52, 57, 60, 61, 64, 65, 67, 69, 70, 71, 75, 76, 78, 79, 81, 83, 85, 86, 89, 90, 93, 95, 96, 98, 100, 104, 105, 109, 113, 116, 117, 120, 122, 123, 124, 126, 131, 134 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

LINKS

Clark Kimberling, Table of n, a(n) for n = 1..1000

EXAMPLE

5 - 2*3 + 2 = 1, so a(1) = 5.

MATHEMATICA

u = Table[Sign[Prime[n+2] - 2 Prime[n+1] + Prime[n]], {n, 3, 200}];

Flatten[Position[u, 0]]   (* A064113 *)

Flatten[Position[u, 1]]   (* A258025 *)

Flatten[Position[u, -1]]  (* A258026 *)

Accumulate[Length/@Split[Differences[Array[Prime, 100]], #1>=#2&]]//Most (* Gus Wiseman, Mar 25 2020 *)

PROG

(PARI) isok(k) = prime(k+2) - 2*prime(k+1) + prime(k) > 0; \\ Michel Marcus, Jun 03 2015

(PARI) is(n, p=prime(n))=my(q=nextprime(p+1), r=nextprime(q+1)); p + r > 2*q

v=List(); n=0; forprime(p=2, 1e4, if(is(n++, p), listput(v, n))); v \\ Charles R Greathouse IV, Jun 03 2015

CROSSREFS

Partition of the positive integers:  A064113, A258025, A258026;

Corresponding partition of the primes: A063535, A063535, A147812.

Adjacent terms differing by 1 correspond to weak prime quartets A054819.

The version for the Kolakoski sequence is A156243.

The version for strict descents is A258026.

The version for weak ascents is A333230.

The version for weak descents is A333231.

First differences are A333212 (if the first term is 0).

Prime gaps are A001223.

Positions of adjacent equal prime gaps are A064113.

Weakly decreasing runs of compositions in standard order are A124765.

A triangle counting compositions by strict ascents is A238343.

Positions of adjacent unequal prime gaps are A333214.

Lengths of maximal anti-runs of prime gaps are A333216.

Cf. A000040, A036263, A084758, A114994, A124760, A124761, A124766, A333215.

Sequence in context: A024977 A088759 A227130 * A239419 A195439 A338446

Adjacent sequences:  A258022 A258023 A258024 * A258026 A258027 A258028

KEYWORD

nonn,easy

AUTHOR

Clark Kimberling, Jun 02 2015

STATUS

approved

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified July 28 10:51 EDT 2021. Contains 346326 sequences. (Running on oeis4.)