%I A078286
%S A078286 20,21,20,21,22,26,204,209,207,203,217,222,205,215,235,212,236,244,201,
%T A078286 213,219,237,249,267,291,202,206,214,218,226,254,262,274,278,298,2114,
%U A078286 2041,2119,2004,2076,2148,2172,2101,2123,2167,2189,2110,2007,2043,2061
%N A078286 Least nontrivial multiple of the n-th prime beginning with 2.
%t A078286 f[n_] := Block[{k = 2, m = n}, While[ IntegerDigits[k*m][[1]] != 2, k++ 
               ]; k*m]; Table[ f[ Prime[n]], {n, 1, 55}]
%Y A078286 Cf. A078285, A078287, A078288, A078289, A078290, A078291, A078292, A078293.
%Y A078286 Sequence in context: A022354 A165841 A091235 this_sequence A004461 A008553 
               A007930
%Y A078286 Adjacent sequences: A078283 A078284 A078285 this_sequence A078287 A078288 
               A078289
%K A078286 base,easy,nonn
%O A078286 1,1
%A A078286 Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Nov 26 2002
%E A078286 Edited and extended by Robert G. Wilson (rgwv(AT)rgwv.com), Nov 29 2002