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