|
|
A280080
|
|
Lower ends of record gaps between prime-indexed primes.
|
|
2
|
|
|
3, 5, 17, 41, 83, 127, 241, 283, 617, 1297, 1913, 2099, 3761, 5869, 9103, 10909, 46751, 104827, 114089, 152953, 177791, 219931, 293123, 368153, 2101553, 3733111, 5188297, 5336477, 7244099, 9026123, 12818959, 21330371, 21459517, 24931771, 32637571, 79689091, 182395973
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
a(4) = 41 because the next prime-indexed prime after 41 is 59, and that is a record gap of size 18.
|
|
MATHEMATICA
|
Function[s, Function[t, Flatten@ Map[s[[First@ Position[t, #]]] &, Union@ Rest@ FoldList[Max, 0, t]]]@ Differences@ s]@ Array[Prime@ Prime@ # &, 10^5] (* Michael De Vlieger, Dec 25 2016 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|