A184935 Primes of the form k^2 + prime(k).
3, 7, 23, 83, 181, 239, 563, 1013, 1447, 1607, 2129, 2729, 3167, 3881, 4673, 5849, 6481, 7489, 8563, 9719, 11813, 18713, 21563, 25247, 27197, 29221, 33469, 36467, 47977, 50683, 51599, 56237, 69257, 71389, 75731, 96893, 107119, 115163
Offset: 1
Examples
3167 is here because 54^2 + prime(54) = 54^2 + 251 = 3167, which is prime.
Links
- Carmine Suriano, Table of n, a(n) for n = 1..82
Programs
-
Magma
[ a: k in [0..10000] | IsPrime(a) where a is k^2 + NthPrime(k) ]; // Vincenzo Librandi, Apr 14 2011
-
Mathematica
Select[Table[k^2 + Prime[k], {k, 1000}], PrimeQ] (* Harvey P. Dale, Feb 16 2011 *)
Extensions
Better name from Zak Seidov, Apr 12 2011
Comments