A105962 Numbers k such that prime(k^2) - k is prime.
2, 30, 38, 44, 74, 82, 88, 96, 106, 114, 132, 138, 140, 160, 162, 184, 230, 276, 278, 280, 298, 304, 316, 318, 332, 342, 414, 420, 428, 450, 470, 480, 540, 580, 584, 600, 638, 668, 672, 678, 680, 684, 728, 750, 754, 766, 768, 788, 798, 848, 858, 860, 902, 930
Offset: 1
Keywords
Links
- Jinyuan Wang, Table of n, a(n) for n = 1..500
Programs
-
Mathematica
Select[Range[1000], PrimeQ[Prime[ #^2] - # ] &]
-
PARI
is(k) = isprime(prime(k^2)-k); \\ Jinyuan Wang, Apr 10 2020