|
Search: id:A111436
|
|
|
| A111436 |
|
Least multiple of n such that every partial concatenation followed by a 1 is prime. |
|
+0
1
|
|
| 1, 8, 3, 4, 5, 78, 28, 32, 36, 40, 176, 528, 624, 280, 30, 144, 1088, 432, 1273, 120, 1869, 440, 3427, 1632, 2000, 2080, 1701, 2268, 10179, 480, 5270, 2464, 660, 1632, 4970, 1044, 222, 2242, 351, 3120, 5576, 798, 1032, 5896, 630, 230, 1081, 8064, 9261, 9500
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
EXAMPLE
|
11,181,183,1834,183451,...etc. are all prime.
|
|
MATHEMATICA
|
s = ""; Do[k = 1; While[ !PrimeQ[ToExpression[s <> ToString[k*n] <> "1"]], k++ ]; Print[k*n]; s = s <> ToString[k*n], {n, 1, 100}] (Propper)
|
|
CROSSREFS
|
Sequence in context: A070474 A070597 A091895 this_sequence A014549 A021549 A013665
Adjacent sequences: A111433 A111434 A111435 this_sequence A111437 A111438 A111439
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Aug 03 2005
|
|
EXTENSIONS
|
More terms from Ryan Propper (rpropper(AT)stanford.edu), Sep 21 2005
|
|
|
Search completed in 0.002 seconds
|
