A102527 Numbers k such that k111111 is prime.
29, 34, 61, 71, 80, 85, 89, 94, 101, 103, 106, 107, 115, 118, 122, 124, 128, 131, 149, 158, 163, 166, 193, 194, 199, 205, 212, 233, 248, 251, 256, 265, 268, 277, 290, 316, 323, 326, 328, 346, 347, 355, 356, 361, 365, 367, 382, 383, 386, 389, 394, 398, 404, 424, 430, 431, 436, 439, 452, 454, 457
Offset: 1
Examples
If k=29, then k111111 = 29111111 (prime). If k=101, then k111111 = 101111111 (prime). If k=122, then k111111 = 122111111 (prime).
Links
- Daniel Starodubtsev, Table of n, a(n) for n = 1..10000
Programs
-
Magma
[ n: n in [1..700] | IsPrime(Seqint([1,1,1,1,1,1] cat Intseq(n))) ]; // Vincenzo Librandi, Feb 04 2011
-
Mathematica
Select[Range[500],PrimeQ[FromDigits[Join[IntegerDigits[#],{1,1,1,1,1,1} ]]]&] (* Harvey P. Dale, Aug 22 2011 *) Select[Range[500],PrimeQ[#*10^6+111111]&] (* Harvey P. Dale, Nov 30 2022 *)