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.
%I A226973 #19 Jun 26 2013 12:33:34 %S A226973 1,1,5,16,56,208,127,1016,4969,47223,264979,789832,7668081,4272696, %T A226973 130217625,883909125,9969785792,52152119144,128092980744, %U A226973 2166664965184,29992267884032,272465658461528,1588888484126208,10747891377020979,5480400487212279,70703132766750784,1908984584702271168 %N A226973 Difference between n! and the largest cube < n!. %C A226973 Also, smallest number k such that n! - k is a cube. %C A226973 Sequence is not monotonic: a(n) < a(n-1) for n: 7, 14, 25, 30, 51, 106, 168, 279, 288. %H A226973 Charles R Greathouse IV, <a href="/A226973/b226973.txt">Table of n, a(n) for n = 1..500</a> %F A226973 a(n) = n! - floor (n!^(1/3))^3 = A000142(n) - A214083(n)^3. %e A226973 a(2) = 2! - 1^3 = 1, a(3) = 3! - 1^3 = 5, a(4) = 4! - 3^3 = 16. %t A226973 Join[{1}, Table[n! - Floor[(n!)^(1/3)]^3, {n, 2, 30}]] %o A226973 (PARI) a(n)=my(N=n!);N-sqrtnint(N,3)^3 \\ _Charles R Greathouse IV_, Jun 25 2013 %Y A226973 Cf. A000142, A066857, A214083. %K A226973 nonn %O A226973 1,3 %A A226973 _Zak Seidov_, Jun 25 2013