A103401 Numbers k such that k211 is prime.
0, 4, 6, 7, 10, 12, 18, 19, 21, 27, 28, 30, 33, 34, 49, 58, 61, 63, 67, 72, 75, 84, 87, 88, 96, 105, 108, 109, 111, 115, 118, 126, 130, 135, 142, 147, 150, 154, 157, 163, 165, 168, 175, 177, 180, 181, 184, 186, 187, 199, 201, 205, 214, 216, 223, 228, 234, 235, 249, 256, 258, 259, 264, 268, 271, 279
Offset: 1
Examples
If k=27, then k211 = 27211 (prime). If k=72, then k211 = 72211 (prime).
Links
- Harvey P. Dale, Table of n, a(n) for n = 1..1000
Programs
-
Magma
[ n: n in [0..700] | IsPrime(Seqint([1, 1, 2] cat Intseq(n))) ]; // Vincenzo Librandi, Feb 03 2011
-
Mathematica
For[n = 0, n < 220, n++, If[PrimeQ[1000*n + 211], Print[n]]] (* Stefan Steinerberger, Feb 12 2006 *) Select[Range[0,300],PrimeQ[1000#+211]&] (* Harvey P. Dale, Dec 14 2021 *)
Extensions
More terms from Stefan Steinerberger, Feb 12 2006
Comments