|
| |
|
|
A090497
|
|
Smallest prime p such that the concatenation 2,3,5,7, ... (primes) ... p is a multiple of prime(n).
|
|
0
| |
|
|
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; refs; listen; history; internal format)
|
|
|
|
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: A058502 A080266 A180423 * A128371 A153655 A153657
Adjacent sequences: A090494 A090495 A090496 * 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
|
| |
|
|
