A102373 Numbers k such that k33333 is prime.

7, 11, 26, 28, 32, 34, 37, 44, 49, 56, 62, 64, 70, 85, 95, 103, 106, 110, 119, 121, 125, 127, 130, 134, 140, 142, 154, 166, 167, 170, 176, 181, 209, 215, 217, 236, 259, 275, 277, 281, 293, 296, 307, 313, 319, 320, 323, 329, 337, 343, 347, 349, 370, 376, 379, 382, 392, 400, 407, 412, 415, 424, 431

Offset

1,1

Links

Table of n, a(n) for n=1..63.

Example

If k=7, then k33333 = 733333 (prime).
If k=49, then k33333 = 4933333 (prime).
If k=95, then k33333 = 9533333 (prime).

Mathematica

Select[Range[500], PrimeQ[FromDigits[Join[IntegerDigits[#], {3, 3, 3, 3, 3} ]]]&] (* Harvey P. Dale, Jun 20 2011 *)

Prog

(Magma) [ n: n in [1..700] | IsPrime(Seqint([3, 3, 3, 3, 3] cat Intseq(n))) ]; // Vincenzo Librandi, Feb 04 2011

Crossrefs

Sequence in context: A247590 A027830 A134043 * A002643 A276504 A039287

Adjacent sequences: A102370 A102371 A102372 * A102374 A102375 A102376

Keyword

base,nonn

Author

Parthasarathy Nambi, Feb 22 2005

Status

approved