A075011 Floor[ concatenation of numbers from n to 1 divided by concatenation of numbers from 1 to n].

1, 1, 2, 3, 4, 5, 6, 7, 8, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 8, 8, 0

Offset

1,3

Links

Harvey P. Dale, Table of n, a(n) for n = 1..1000

Example

a(4) = Floor[4321/1234] = 3.

Mathematica

Table[Floor[FromDigits[Flatten[IntegerDigits/@Range[n, 1, -1]]]/FromDigits[ Flatten[IntegerDigits/@Range[n]]]], {n, 100}] (* Harvey P. Dale, May 29 2013 *)

Crossrefs

Sequence in context: A254926 A155919 A265540 * A283001 A037851 A037887

Adjacent sequences: A075008 A075009 A075010 * A075012 A075013 A075014

Keyword

base,nonn

Author

Amarnath Murthy, Sep 01 2002

Extensions

Corrected and extended by Antonio G. Astudillo (afg_astudillo(AT)lycos.com), Apr 18 2003

Status

approved