OFFSET
0,4
LINKS
Harry J. Smith, Table of n, a(n) for n = 0..100
FORMULA
a(n) = floor(sqrt(n!))^2.
MATHEMATICA
Array[Floor@ Sqrt[#!]^2 &, 21, 0] (* Michael De Vlieger, Dec 06 2018 *)
PROG
(PARI) { for (n=0, 100, a=sqrtint(n!)^2; write("b065731.txt", n, " ", a) ) } \\ Harry J. Smith, Oct 28 2009
(Magma) [Floor(Sqrt(Factorial(n)))^2: n in [0..25]]; // Vincenzo Librandi, Dec 07 2018
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Labos Elemer, Nov 15 2001
EXTENSIONS
Offset changed from 1 to 0 by Harry J. Smith, Oct 28 2009
STATUS
approved