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