%I #6 Jul 18 2012 20:07:18
%S 2,7,23,47,53,59,79,179,211,257,311,331,373,379,431,443,487,491,503,
%T 523,647,661,673,677,683,691,857,863,887,919,947,1009,1021,1091,1129,
%U 1151,1171,1193,1231,1237,1277,1283,1471,1663,1667,1753,1777,1811,1993
%N Primes of the form pi(n) + prime(n).
%C Primes appearing in A100486.
%H Vincenzo Librandi, <a href="/A100917/b100917.txt">Table of n, a(n) for n = 1..1000</a>
%F a(n) = A100486(A065042(n)).
%t Select[Table[PrimePi[n] + Prime[n], {n, 300}], PrimeQ]
%Y Cf. A065042, A100486.
%K nonn
%O 1,1
%A _Ray Chandler_, Nov 27 2004
|