This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A126779 #14 Jan 10 2019 22:52:48
%S A126779 6,60,750,11340,201726,4131036,95750430,2478397020,70864914846,
%T A126779 2218385781612,75463626886830,2771883228523500,109340261175108606,
%U A126779 4609962410815813308,206883575626027168830,9846362287666897852860
%N A126779 Number of functions f:{1,2,...,n}->{1,2,...,n} such that Im(f) contains 3 fixed elements.
%H A126779 Robert Israel, <a href="/A126779/b126779.txt">Table of n, a(n) for n = 3..386</a>
%H A126779 Milan Janjic, <a href="http://www.pmfbl.org/janjic/">Enumerative Formulas for Some Functions on Finite Sets</a>
%F A126779 a(n) = n^n-3*(n-1)^n+3*(n-2)^n-(n-3)^n, (n=3,4,...)
%F A126779 E.g.f.: (W(-x)^3 + 3*x*W(-x)^2 + 3*x^2*W(-x) + x^3)/(W(-x)^3*(1 + W(-x))) where W is the Lambert W function. - _Robert Israel_, Jan 10 2019
%e A126779 a(7)=201726
%p A126779 a:=n->n^n-3*(n-1)^n+3*(n-2)^n-(n-3)^n;
%t A126779 Drop[Table[Sum[(-1)^k Binomial[3,k] (n-k)^n,{k,0,3}],{n,1,20}],2] (* _Geoffrey Critzer_, Dec 23 2012 *)
%K A126779 nonn
%O A126779 3,1
%A A126779 Aleksandar M. Janjic and _Milan Janjic_, Feb 18 2007