A320453 a(n) = (n^n + n*(-1)^n)/(n + 1).
0, 2, 6, 52, 520, 6666, 102942, 1864136, 38742048, 909090910, 23775972550, 685853880636, 21633936185160, 740800455037202, 27368368148803710, 1085102592571150096, 45957792327018709120, 2070863582910344082918, 98920982783015679456198, 4993219047619047619047620
Offset: 1
Keywords
Links
- Muniru A Asiru, Table of n, a(n) for n = 1..385
Programs
-
GAP
List([1..20],n->(n^n+n*(-1)^n)/(n+1)); # Muniru A Asiru, Oct 13 2018
-
Magma
[(n^n + n*(-1)^n)/(n + 1) : n in [1..25]]; // Vincenzo Librandi, Oct 14 2018
-
Maple
a:=n->(n^n+n*(-1)^n)/(n+1): seq(a(n),n=1..20); # Muniru A Asiru, Oct 13 2018
-
Mathematica
Table[(n^n + n*(-1)^n)/(n + 1), {n, 0, 50}]
-
PARI
a(n) = (n^n + n*(-1)^n)/(n + 1);
Extensions
a(10)-a(20) from Muniru A Asiru, Oct 13 2018
Comments