|
| |
|
|
A078291
|
|
Least nontrivial multiple of the n-th prime beginning with 7.
|
|
8
| |
|
|
70, 72, 70, 70, 77, 78, 714, 76, 713, 725, 713, 74, 738, 731, 705, 742, 708, 732, 737, 710, 730, 711, 747, 712, 776, 707, 721, 749, 763, 791, 762, 786, 7124, 7089, 745, 755, 785, 7009, 7014, 7093, 716, 724, 764, 772, 788, 796, 7174, 7136, 7037, 7099, 7223
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
MATHEMATICA
| f[n_] := Block[{k = 2, m = n}, While[ IntegerDigits[k*m][[1]] != 7, k++ ]; k*m]; Table[ f[ Prime[n]], {n, 1, 55}]
|
|
|
CROSSREFS
| Cf. A078285, A078286, A078287, A078288, A078289, A078290, A078292, A078293.
Sequence in context: A129352 A156810 A166506 * A118216 A114838 A036191
Adjacent sequences: A078288 A078289 A078290 * A078292 A078293 A078294
|
|
|
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
|
| |
|
|
