%I #8 Jul 29 2015 01:08:27
%S 3,36,369,3702,37035,370368,3703701,37037034,370370367,3703703700,
%T 37037037033,370370370366,3703703703699,37037037037032,
%U 370370370370365,3703703703703698,37037037037037031,370370370370370364
%N Partial sums of repdigits of A002277.
%F a(n) = (3/81)*(10^(n+1) - 9*n - 10). - R. Piyo (nagoya314(AT)yahoo.com), Dec 10 2004
%e 3+33+333+3333=a[4]=3702
%p a:=n->sum((10^(n-j)-1^(n-j))/3,j=0..n): seq(a(n), n=1..18); # _Zerinvary Lajos_, Jan 15 2007
%t <<NumberTheory`NumberTheoryFunctions` Table[{k, Table[Apply[Plus, Table[k*(10^n-1)/9, {n, 1, m}]], {m, 1, 35}]}, {k, 1, 9}]
%t Table[3/9*Sum[10^i - 1, {i, n}], {n, 18}] (* _Robert G. Wilson v_, Nov 20 2004 *)
%Y Cf. A057932, A002275-A002283.
%K nonn
%O 1,1
%A _Labos Elemer_, Nov 17 2004
|