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 A214083 #24 Jan 20 2024 11:29:06 %S A214083 1,1,1,1,2,4,8,17,34,71,153,341,782,1839,4434,10935,27555,70852, %T A214083 185686,495486,1344956,3710632,10397338,29568648,85290741,249391641, %U A214083 738821756,2216465268,6730493989,20678209929,64252006059,201840008711,640802084315 %N A214083 a(n) = floor(n!^(1/3)). %H A214083 Vincenzo Librandi, <a href="/A214083/b214083.txt">Table of n, a(n) for n = 0..1000</a> %t A214083 Table[Floor[n!^(1/3)], {n, 0, 60}] (* _Vincenzo Librandi_, Feb 08 2013 *) %o A214083 (Derive) PROG(y := [], n := 35, LOOP(IF(n = -1, RETURN y), y := ADJOIN(FLOOR(n!^(1/3)), y), n := n - 1)) %o A214083 (Magma) [Floor(Factorial(n)^(1/3)): n in [0..40]]; // _Vincenzo Librandi_, Feb 08 2013 %o A214083 (PARI) a(n) = sqrtnint(n!,3); \\ _Michel Marcus_, Jan 11 2016 %Y A214083 Cf. A214078, A214079, A214080, A214081, A214083, A055228, A055226. %K A214083 easy,nonn %O A214083 0,5 %A A214083 _Mohammad K. Azarian_, Dec 22 2012