cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

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

This page as a plain text file.
%I A067123 #6 Aug 06 2020 19:14:00
%S A067123 1,1,12,12,122,1225,12252,122526,1225268,12252682,122526828,
%T A067123 1225268284,12252682845,122526828457,1225268284577,12252682845779,
%U A067123 122526828457797,1225268284577978,12252682845779785,122526828457797852
%N A067123 Floor[X/Y] where X = concatenation of first n cubes in increasing order and Y = concatenation of first n squares.
%H A067123 Harvey P. Dale, <a href="/A067123/b067123.txt">Table of n, a(n) for n = 1..467</a>
%e A067123 a(5) = floor[182764125/1491625] = floor[122.526858292131065113550657839604] = 122.
%t A067123 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 *)
%Y A067123 Cf. A067112-A067122.
%K A067123 easy,nonn,base
%O A067123 1,3
%A A067123 _Amarnath Murthy_, Jan 08 2002
%E A067123 More terms from Antonio G. Astudillo (afg_astudillo(AT)lycos.com), Apr 01 2003