|
Search: id:A080441
|
|
|
| A080441 |
|
a(1) = 17, a(n) = smallest prime obtained by inserting digits between every pair of digits of a(n-1). |
|
+0
4
|
|
| 17, 107, 10007, 100000007, 10000000000003037, 100000000000000000000000003000307, 10000000000000000000000000000000000000000000000000003000000030057
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
Conjecture: Only one digit needs to be inserted between each pair of digit of a(n-1) to get a(n); i.e. a(n) contains exactly 2n-1 digits for n > 1.
|
|
MATHEMATICA
|
a[n_] := Block[{d = IntegerDigits[n]}, k = Length[d]; While[k > 1, d = Insert[d, 0, k]; k-- ]; d = FromDigits[d]; e = d; k = 0; While[ !PrimeQ[e], k++; e = d + 10FromDigits[ IntegerDigits[k], 100]]; e]; NestList[a, 17, 6]
|
|
CROSSREFS
|
Cf. A080439, A080440, A080442, A080883 - A080914.
Sequence in context: A125327 A126485 A159031 this_sequence A135400 A052254 A156851
Adjacent sequences: A080438 A080439 A080440 this_sequence A080442 A080443 A080444
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Feb 22 2003
|
|
EXTENSIONS
|
Edited and extended by Robert G. Wilson v (rgwv(AT)rgwv.com), Feb 22 2003
|
|
|
Search completed in 0.002 seconds
|
