The OEIS is supported by the many generous donors to the OEIS Foundation.
Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #26 Jan 28 2023 18:25:53
%S 1,5,7,8,11,13,40,106,132,154,478,647,1576,2067,2656,3837,5158,6985,
%T 7844,9777,11607,21027,22638,31979,33592,34279
%N Indices of the primes of |A007442|.
%t fQ[n_] := PrimeQ[ Differences[ Prime@ Range@ n, n - 1]][[1]]; k = 1; lst = {}; While[k < 36001, If[fQ@ k, AppendTo[lst, k]; k++]; lst
%Y Cf. A007442.
%K nonn,more
%O 1,2
%A _Robert G. Wilson v_, Jan 08 2023