OFFSET
1,1
EXAMPLE
a(4) = floor(8765/1234) = 7.
a(6) = floor(121110987/123456) = floor(981.00527313374805598755832037325) = 981.
MATHEMATICA
f[n_] := (k = 1; x = y = "0"; While[k < n + 1, x = StringJoin[x, ToString[2n - k + 1]]; y = StringJoin[y, ToString[2k - 1]]; k++ ]; Return[ Floor[ ToExpression[x] / ToExpression[y]]] ); Table[ f[n], {n, 1, 25} ]
Table[Floor[FromDigits[Flatten[IntegerDigits/@(Range[2n, n+1, -1])]]/FromDigits[Flatten[IntegerDigits/@(Range[n])]]], {n, 25}] (* Harvey P. Dale, Jul 24 2011 *)
CROSSREFS
KEYWORD
easy,base,nonn
AUTHOR
Amarnath Murthy, Jan 07 2002
EXTENSIONS
More terms from Robert G. Wilson v, Jan 09 2002
Edited by N. J. A. Sloane at the suggestion of Andrew S. Plewe, May 14 2007
Offset corrected by Sean A. Irvine, Dec 02 2023
STATUS
approved