%I #15 Sep 08 2022 08:45:13
%S 4,69,774,8199,84999,871425,8874999,89999999,909999999,9181818179,
%T 92499999999,930769230759,9357142857140,93999999999999,
%U 943749999999999,9470588235294111,94999999999999999,952631578947368403,9549999999999999999,95714285714285714279
%N a(n) = 10^(n-1) - 1 + n*floor(9*10^(n-1)/(n+1)).
%C This sequence is the main diagonal of A093850.
%H G. C. Greubel, <a href="/A093852/b093852.txt">Table of n, a(n) for n = 1..995</a>
%e n-th row of the following triangle contains n uniformly located n-digit numbers. i.e. n terms of an arithmetic progression with 10^(n-1)-1 as the term preceding the first term and (n+1)-th term is the largest possible n-digit term.
%e Given the triangle defined in A093850:
%e ...4;
%e ..39 69;
%e .324 549 774;
%e 2799 4599 6399 8199.....
%e then this sequence is the leading diagonal.
%p A093852 := proc(n)
%p r := n ;
%p 10^(n-1)-1+r*floor(9*10^(n-1)/(n+1)) ;
%p end proc:
%p seq(A093852(n),n=1..50) ; # _R. J. Mathar_, Oct 01 2011
%t Table[10^(n-1) -1 +n*Floor[9*10^(n-1)/(n+1)], {n,25}] (* _G. C. Greubel_, Mar 21 2019 *)
%o (PARI) {a(n) = 10^(n-1) -1 +n*floor(9*10^(n-1)/(n+1))}; \\ _G. C. Greubel_, Mar 21 2019
%o (Magma) [10^(n-1) -1 +n*Floor(9*10^(n-1)/(n+1)): n in [1..25]]; // _G. C. Greubel_, Mar 21 2019
%o (Sage) [10^(n-1) -1 +n*floor(9*10^(n-1)/(n+1)) for n in (1..25)] # _G. C. Greubel_, Mar 21 2019
%Y Cf. A093846, A093847, A061772, A093450, A072875.
%K easy,nonn
%O 1,1
%A _Amarnath Murthy_, Apr 18 2004
|