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 A214448 #7 Jul 24 2012 09:37:29 %S A214448 1,2,2,3,4,6,9,15,25,44,80,148,281,544,1070,2139,4343,8946,18676, %T A214448 39495,84545,183102,400981,887517,1984548,4481308,10215173,23498233, %U A214448 54529901,127618907,301130984,716214216 %N A214448 Least m>0 such that m^4 >= n!. %H A214448 Clark Kimberling, <a href="/A214448/b214448.txt">Table of n, a(n) for n = 1..1000</a> %F A214448 a(n) = ceiling(n!^(1/4)). %e A214448 a(4)=3 because 3^2 < 4! <= 3^3. %p A214448 A214448 := proc(n) %p A214448 ceil(root[4](n!)) ; %p A214448 end proc: # _R. J. Mathar_, Jul 24 2012 %t A214448 Table[Ceiling[n!^(1/4)], {n, 1, 40}] %Y A214448 Cf. A214049. %K A214448 nonn,easy %O A214448 1,2 %A A214448 _Clark Kimberling_, Jul 18 2012