%I A078285
%S A078285 10,12,10,14,110,104,102,114,115,116,124,111,123,129,141,106,118,122,
%T A078285 134,142,146,158,166,178,194,1010,1030,1070,1090,1017,1016,1048,1096,
%U A078285 1112,1043,1057,1099,1141,1002,1038,1074,1086,1146,1158,1182,1194,1055
%N A078285 Least nontrivial multiple of the n-th prime beginning with 1.
%t A078285 f[n_] := Block[{k = 2, m = n}, While[ IntegerDigits[k*m][[1]] != 1, k++ 
               ]; k*m]; Table[ f[ Prime[n]], {n, 1, 55}]
%Y A078285 Cf. A078286, A078287, A078288, A078289, A078290, A078291, A078292, A078293.
%Y A078285 Sequence in context: A109280 A064841 A064795 this_sequence A103618 A031166 
               A098732
%Y A078285 Adjacent sequences: A078282 A078283 A078284 this_sequence A078286 A078287 
               A078288
%K A078285 base,easy,nonn
%O A078285 1,1
%A A078285 Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Nov 26 2002
%E A078285 Edited, corrected and extended by Robert G. Wilson (rgwv(AT)rgwv.com), 
               Nov 29 2002