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 A214081 #29 Jan 16 2024 10:35:35
%S A214081 1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,6,6,6,6,6,6,6,
%T A214081 6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,24,24,24,
%U A214081 24,24,24,24,24,24,24,24,24,24,24,24,24,24
%N A214081 a(n) = floor( n^(1/3) )!.
%H A214081 Vincenzo Librandi, <a href="/A214081/b214081.txt">Table of n, a(n) for n = 0..1000</a>
%F A214081 Sum_{n>=0} 1/a(n) = 10*e. - _Amiram Eldar_, Aug 15 2022
%F A214081 a(n) = A000142(A048766(n)). - _Michel Marcus_, Aug 15 2022
%t A214081 Table[Floor[n^(1/3)]!, {n, 0, 100}] (* _T. D. Noe_, Dec 23 2012 *)
%t A214081 Floor[CubeRoot[Range[0,90]]]! (* _Harvey P. Dale_, Jan 15 2024 *)
%o A214081 (Derive) PROG(y := [], n := 70, LOOP(IF(n = -1, RETURN y), y := ADJOIN(FLOOR(n^(1/3))!, y), n := n - 1))
%o A214081 (Magma) [Factorial(Floor(n^(1/3))): n in [0..80]]; // _Vincenzo Librandi_, Feb 13 2013
%o A214081 (PARI) a(n) = floor(n^(1/3))!; \\ _Altug Alkan_, Jan 11 2016
%Y A214081 Cf. A055226, A055228, A214078, A214079, A214080, A214081, A214083.
%Y A214081 Cf. A000142, A048766.
%K A214081 easy,nonn
%O A214081 0,9
%A A214081 _Mohammad K. Azarian_, Dec 22 2012