login
A067123
Floor[X/Y] where X = concatenation of first n cubes in increasing order and Y = concatenation of first n squares.
1
1, 1, 12, 12, 122, 1225, 12252, 122526, 1225268, 12252682, 122526828, 1225268284, 12252682845, 122526828457, 1225268284577, 12252682845779, 122526828457797, 1225268284577978, 12252682845779785, 122526828457797852
OFFSET
1,3
LINKS
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
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