%I #14 Jan 02 2024 14:14:13
%S 2,5,13,31,61,109,181,277,397,547,733,947,1213,1499,1831,2207,2633,
%T 3083,3583,4133,4751,5407,6073,6793,7589,8513,9397,10313,11353,12409,
%U 13451,14713,15889,17299,18593,20129,21613,23167,24851,26561,28387,30203
%N Sequence of primes separated by [sequence of prime] elements. 2, [find 2nd prime after 2 = ] 5, [find 3rd prime after 5 =] 13, [find 5th prime after 13 =] 61, ..., etc.
%C Similar to A006450.
%t NestList[n = 0; (n++; NextPrime[ #, Prime@ n]) &, 2, 41] (* _Robert G. Wilson v_, Aug 25 2010 *)
%t Prime[Accumulate[Join[{1}, Prime[Range[45]]]]] (* _Alonso del Arte_, Oct 09 2012 *)
%Y Cf. A006450, A014284.
%K nonn
%O 1,1
%A _Daniel Tisdale_, Aug 24 2010
%E a(8) onwards from _Robert G. Wilson v_, Aug 25 2010