%I A121060
%S A121060 0,5,9,7,2,31,28,8,9,1,45,38,54,61,84,13,72,85,81,5,92,94,99,131,4,111,
%T A121060 90,123,126,87,108,11,48,146,157,240,108,164,115,7,144,184,180,191,88,
%U A121060 200,207,142,204,2,217,228,252,247,243,249,251,253,261,349,270,217,246
%N A121060 Sum of the first n digits to the right of the decimal expansion of 1/
               n.
%C A121060 First occurrence of k or -1 if not present: 1,10,5,-1,25,2,-1,4,8,3,-1,
               32,-1,16,-1,-1,-1,-1,-1,64,-1,-1,-1,128,-1,256,...,. - Robert G. 
               Wilson v Aug 17 2006.
%e A121060 a(2)=5 because 1/2=.50 and 5+0=5.
%e A121060 a(3)=9 because 1/3=.3333... and 3+3+3=9.
%e A121060 a(7)=28 because 1/7=0.14285714285714... and 1+4+2+8+5+7+1=28.
%t A121060 f[n_] := If[n == 1, 0, Plus @@ IntegerDigits[Floor[10^n/n]]]; Array[f, 
               63] (* Robert G. Wilson v, Aug 17 2006 *)
%Y A121060 Sequence in context: A117605 A073003 A087498 this_sequence A021630 A079459 
               A118309
%Y A121060 Adjacent sequences: A121057 A121058 A121059 this_sequence A121061 A121062 
               A121063
%K A121060 nonn,base
%O A121060 1,2
%A A121060 Gil Broussard (gilbroussard(AT)bellsouth.net), Aug 09 2006