OFFSET
0,2
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..200
FORMULA
a(n) = Sum (k+1)!(C(n, k) mod (2+k)), k=0..n
EXAMPLE
a(5) = (1 mod 2)1!+(5 mod 3)2!+(10 mod 4)3!+(10 mod 5)4!+(5 mod 6)5!+(1 mod 7)6! = 1*1+2*2+2*6+0*24+5*120+1*720 = 1337
MAPLE
a(n) := proc(n) local i; RETURN(add(((binomial(n, i)mod(i+2))*((i+1)!)), i=0..n)); end;
MATHEMATICA
a[n_] := Sum[(k+1)!*Mod[Binomial[n, k], 2+k], {k, 0, n}]; Table[a[n], {n, 0, 19}] (* Jean-François Alcover, Sep 09 2013 *)
CROSSREFS
KEYWORD
nonn,nice,base
AUTHOR
Antti Karttunen, Oct 24 1999
STATUS
approved