A067123 Floor[X/Y] where X = concatenation of first n cubes in increasing order and Y = concatenation of first n squares.

1, 1, 12, 12, 122, 1225, 12252, 122526, 1225268, 12252682, 122526828, 1225268284, 12252682845, 122526828457, 1225268284577, 12252682845779, 122526828457797, 1225268284577978, 12252682845779785, 122526828457797852

Offset

1,3

Links

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

Example

a(5) = floor[182764125/1491625] = floor[122.526858292131065113550657839604] = 122.

Mathematica

fxy[n_]:=Module[{c=FromDigits[Flatten[IntegerDigits/@(Range[n]^3)]], s = FromDigits[ Flatten[ IntegerDigits/@(Range[n]^2)]]}, Floor[c/s]]; Array[fxy, 20] (* Harvey P. Dale, Aug 06 2020 *)

Crossrefs

Cf. A067112-A067122.

Sequence in context: A143478 A219400 A219448 * A178341 A165833 A038338

Adjacent sequences: A067120 A067121 A067122 * A067124 A067125 A067126

Keyword

easy,nonn,base

Author

Amarnath Murthy, Jan 08 2002

Extensions

More terms from Antonio G. Astudillo (afg_astudillo(AT)lycos.com), Apr 01 2003

Status

approved