A084792 - OEIS

%I #29 Apr 13 2024 19:29:00

%S 2,5,11,13,19,23,31,37,41,43,53,59,67,71,73,79,89,97,103,107,109,113,

%T 131,137,139,149,151,157,167,173,181,191,193,197,199,211,227,229,233,

%U 239,251,257,269,271,277,281,293,307,311,313,317,331,347,349,353,359

%N Primes other than those of the form prime(prime(n)+n-1).

%C From _Carmine Suriano_, Jan 25 2011: (Start)

%C Can be obtained from the following sieve: consider the list of all primes, at step n remove the prime(n)-th number in the list, compact and restart.

%C a(n) can be approximated by 3*n^2/5000 + 9.124*n - 285.77. (End)

%H Carmine Suriano, <a href="/A084792/b084792.txt">Table of n, a(n) for n = 1..2173</a>

%t t=Table[Prime[Prime[n]+n-1], {n, 20}]; Complement[Prime[Range[PrimePi[t[[-1]]]]], t]

%t Table[NextPrime[n, n], {n, 100}] (* _Wesley Ivan Hurt_, Mar 12 2019 *)

%Y Cf. A000040.

%K nonn,easy,less

%O 1,1

%A _Amarnath Murthy_ and _Jason Earls_, Jul 12 2003

%E Edited by _Don Reble_, Mar 14 2006