|
Search: id:A090497
|
|
|
| A090497 |
|
Smallest prime p such that the concatenation 2,3,5,7, ... (primes) ... p is a multiple of prime(n). |
|
+0
1
|
|
| 2, 29, 5, 11, 17, 61, 31, 271, 3, 13, 107, 1051, 439, 211, 5, 1153, 149, 23, 37, 173, 593, 173, 281, 347, 191, 433, 2083, 109, 389, 1453, 277, 383, 227, 443, 1879, 11, 233, 353, 191, 1723, 547, 241, 397, 181, 199, 7549, 79, 11, 547, 877, 313, 1213, 409, 79, 2969
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
EXAMPLE
|
a(4) = 11 and 235711 is a multiple of prime(4) = 7.
|
|
MATHEMATICA
|
f[n_] := Block[{p = Prime[n], k = 1, q = 2}, While[ Mod[q, p] != 0, k++; q = FromDigits[ Join[ IntegerDigits[q], IntegerDigits[ Prime[k]]]]]; Prime[k]]; Table[ f[n], {n, 1, 55}]
|
|
CROSSREFS
|
Sequence in context: A085602 A058502 A080266 this_sequence A128371 A153655 A153657
Adjacent sequences: A090494 A090495 A090496 this_sequence A090498 A090499 A090500
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Dec 03 2003
|
|
EXTENSIONS
|
Corrected and extended by Robert G. Wilson v (rgwv(AT)rgwv.com), Dec 05 2003
|
|
|
Search completed in 0.002 seconds
|
