|
Search: id:A078289
|
|
|
| A078289 |
|
Least nontrivial multiple of the n-th prime beginning with 5. |
|
+0
9
|
|
| 50, 51, 50, 56, 55, 52, 51, 57, 506, 58, 527, 518, 533, 516, 517, 530, 531, 549, 536, 568, 511, 553, 581, 534, 582, 505, 515, 535, 545, 565, 508, 524, 548, 556, 596, 5134, 5024, 5053, 501, 519, 537, 543, 573, 579, 591, 597, 5064, 5129, 5221, 5038, 5126
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
MATHEMATICA
|
f[n_] := Block[{k = 2, m = n}, While[ IntegerDigits[k*m][[1]] != 5, k++ ]; k*m]; Table[ f[ Prime[n]], {n, 1, 55}]
|
|
CROSSREFS
|
Cf. A078285, A078286, A078287, A078288, A078290, A078291, A078292, A078293.
Sequence in context: A090691 A033980 A165871 this_sequence A043618 A134691 A139182
Adjacent sequences: A078286 A078287 A078288 this_sequence A078290 A078291 A078292
|
|
KEYWORD
|
base,easy,nonn
|
|
AUTHOR
|
Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Nov 26 2002
|
|
EXTENSIONS
|
Edited, corrected and extended by Robert G. Wilson (rgwv(AT)rgwv.com), Nov 29 2002
|
|
|
Search completed in 0.002 seconds
|
