OFFSET
1,1
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..995
FORMULA
a(n) = 10^(n-1) - 1 + floor(9*10^(n-1)/n) = A093846(n, 1). - R. J. Mathar, Jun 23 2006
MAPLE
A093847 := proc(n) RETURN (10^(n-1)-1+floor(9*(10^(n-1)/n))); end; for n from 1 to 20 do printf("%d, ", A093847(n)); od; # R. J. Mathar, Jun 23 2006
MATHEMATICA
Table[10^(n-1)-1+Floor[9 10^(n-1)/n], {n, 20}] (* Harvey P. Dale, Oct 21 2011 *)
PROG
(PARI) {a(n) = 10^(n-1) -1 +floor(9*10^(n-1)/n)}; \\ G. C. Greubel, Mar 22 2019
(Magma) [10^(n-1) -1 +Floor(9*10^(n-1)/n): n in [1..20]]; // G. C. Greubel, Mar 22 2019
(SageMath) [10^(n-1) -1 +floor(9*10^(n-1)/n) for n in (1..20)] # G. C. Greubel, Mar 22 2019
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
Amarnath Murthy, Apr 18 2004
EXTENSIONS
More terms from R. J. Mathar, Jun 23 2006
Edited by David Wasserman, Mar 26 2007
STATUS
approved
