A260376 Values of n such that prime(prime(n)) + n is a prime number.
2, 6, 16, 20, 30, 42, 78, 90, 92, 102, 108, 118, 124, 126, 128, 132, 136, 150, 160, 166, 180, 182, 186, 194, 196, 202, 206, 210, 214, 230, 270, 280, 294, 348, 356, 358, 366, 370, 374, 378, 418, 436, 456, 458, 472, 474, 478, 492, 522, 546, 556, 560, 570, 584, 586, 590
Offset: 1
Examples
For n=2, prime(prime(2)) + 2 = prime(3) + 2 = 7. 7 is a prime number.
Crossrefs
Cf. A006450.
Programs
-
Magma
[n: n in [1..600] | IsPrime(NthPrime(NthPrime(n))+n)]; // Vincenzo Librandi, Aug 30 2015
-
Mathematica
Select[Range[600], PrimeQ[Prime[Prime[#]] + #] &] (* Vincenzo Librandi, Aug 30 2015 *)
-
PARI
for(n=1, 1e3, if(isprime(prime(prime(n))+n), print1(n", ")))
-
Perl
use ntheory ":all"; my @p = grep { is_prime(nth_prime(nth_prime($))+$) } 1..10000; say join ", ", @p; # Dana Jacobsen, Sep 02 2015
Comments