OFFSET
0,5
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..1000
FORMULA
Sum_{n>=0} 1/a(n) = 3*e. - Amiram Eldar, Aug 15 2022
MATHEMATICA
Table[Floor[Sqrt[n]]!, {n, 0, 100}] (* T. D. Noe, Dec 23 2012 *)
PROG
(Derive) PROG(y := [], n := 50, LOOP(IF( = -1, RETURN y), y := ADJOIN(FLOOR(SQRT(n))!, y), n := n - 1))
(Magma) [Factorial(Floor(Sqrt(n))): n in [0..60]]; // Vincenzo Librandi, Feb 13 2013
(PARI) a(n) = floor(sqrt(n))!; \\ Altug Alkan, Jan 11 2016
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Mohammad K. Azarian, Dec 22 2012
STATUS
approved