|
|
A359629
|
|
Indices of the primes of |A007442|.
|
|
0
|
|
|
1, 5, 7, 8, 11, 13, 40, 106, 132, 154, 478, 647, 1576, 2067, 2656, 3837, 5158, 6985, 7844, 9777, 11607, 21027, 22638, 31979, 33592, 34279
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
MATHEMATICA
|
fQ[n_] := PrimeQ[ Differences[ Prime@ Range@ n, n - 1]][[1]]; k = 1; lst = {}; While[k < 36001, If[fQ@ k, AppendTo[lst, k]; k++]; lst
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,more
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|