%I A127818
%S A127818 3,14,7,6,35,94,993,46,22963573117,11,15084115509707,22,21,86,99985,24,
%T A127818 221819,82,327,1996,28039,26,169,38,39,74,24257,36,10191082613,65,49,34,
%U A127818 4739,66,99965,188,171,62,3753219157,60,3961,58,87,76,28315,159,10441
%N A127818 a(n) = least k such that the remainder when 10^k is divided by k is n.
%H A127818 Robert G. Wilson v, <a href="a127818.txt">Table of n, a(n) for n = 1..10000 
               with -1 for large entries where a(n) has not yet been found</a>
%t A127818 t = Table[0, {10000} ]; k = 1; While[ k < 4000000000, a = PowerMod[10, 
               k, k]; If[a < 10001 && t[[a]] == 0, t[[a]] = k; Print[{a, k}]]; k++ 
               ]; t
%Y A127818 Cf. A036236, A078457, A119678, A119679, A127816, A119715, A119714, A127817, 
               A127819, A127820, A127821.
%Y A127818 Sequence in context: A163357 A058991 A090786 this_sequence A155886 A138959 
               A055435
%Y A127818 Adjacent sequences: A127815 A127816 A127817 this_sequence A127819 A127820 
               A127821
%K A127818 hard,nonn
%O A127818 1,1
%A A127818 Alexander Adamchuk (alex(AT)kolmogorov.com), Jan 30 2007
%E A127818 a(9) <= 22963573117 from Joe K. Crump (joecr(AT)carolina.rr.com), Feb 
               09 2007
%E A127818 a(11) <= 15084115509707 from Joe K. Crump (joecr(AT)carolina.rr.com), 
               Feb 06 2007
%E A127818 a(29) <= 112237795073 from Joe K. Crump (joecr(AT)carolina.rr.com), Feb 
               09 2007
%E A127818 a(39) <= 3753219157 from Joe K. Crump (joecr(AT)carolina.rr.com), Feb 
               10 2007
%E A127818 Crump's values for a(9), a(11), a(39) confirmed, a(29) = 10191082613 
               = 16763 * 607951 by Hagen von Eitzen (math(AT)von-eitzen.de), Jul 
               29 2009