

A070865


Smallest prime such that the difference of successive terms is strictly increasing.


9



2, 3, 5, 11, 19, 29, 41, 59, 79, 101, 127, 157, 191, 227, 269, 313, 359, 409, 461, 521, 587, 659, 733, 809, 887, 967, 1049, 1151, 1259, 1373, 1489, 1607, 1733, 1861, 1993, 2129, 2267, 2411, 2557, 2707, 2861, 3019, 3181, 3347, 3517, 3691, 3877, 4073, 4271
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


COMMENTS



LINKS



FORMULA



MATHEMATICA

nxt[{a_, b_}]:={b, NextPrime[2ba]}; Transpose[NestList[nxt, {2, 3}, 50]][[1]] (* Harvey P. Dale, Jan 04 2015 *)


PROG

(PARI) t=0; print1(last=2); while(1, n=last+t; while(!isprime(n++), ); print1(", "n); t=nlast; last=n) \\ Charles R Greathouse IV, Apr 30 2015


CROSSREFS



KEYWORD

nonn


AUTHOR



EXTENSIONS



STATUS

approved



