OFFSET
0,2
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..10
MATHEMATICA
Table[(2^n)^(2^n) - (2^n)!, {n, 0, 5}] (* G. C. Greubel, Nov 08 2018 *)
PROG
(Magma) [(2^n)^(2^n)-Factorial(2^n): n in [0..5]]; // Vincenzo Librandi, Aug 22 2011
(PARI) vector(6, n, n--; (2^n)^(2^n) - (2^n)!) \\ G. C. Greubel, Nov 08 2018
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Henry Bottomley, Aug 15 2000
STATUS
approved