|
|
A126778
|
|
Number of functions f:{1,2,...,n}->{1,2,...,n} such that Im(f) contain two fixed elements.
|
|
2
|
|
|
2, 12, 110, 1320, 19502, 341796, 6927230, 159338640, 4100173022, 116692730220, 3639243694814, 123411407978040, 4521172518708302, 177943592279325684, 7487880700093141502, 335470576863324471840, 15942605654030732807102, 801021400634789561255868
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
2,1
|
|
LINKS
|
|
|
FORMULA
|
a(n)=n^n-2*(n-1)^n+(n-2)^n (n=2,3,...)
|
|
MAPLE
|
a:=n->n^n-2*(n-1)^n+(n-2)^n;
|
|
MATHEMATICA
|
Drop[Table[Sum[(-1)^k Binomial[2, k] (n-k)^n, {k, 0, 2}], {n, 1, 20}], 1] (* Geoffrey Critzer, Dec 23 2012 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|