cp's OEIS Frontend

A302989 a(n) = n^n + n*n + n.

%I A302989 #25 Jun 13 2020 19:43:08
%S A302989 1,3,10,39,276,3155,46698,823599,16777288,387420579,10000000110,
%T A302989 285311670743,8916100448412,302875106592435,11112006825558226,
%U A302989 437893890380859615,18446744073709551888,827240261886336764483,39346408075296537575766,1978419655660313589124359
%N A302989 a(n) = n^n + n*n + n.
%H A302989 Alois P. Heinz, <a href="/A302989/b302989.txt">Table of n, a(n) for n = 0..386</a> (terms n=1..100 from Muniru A Asiru)
%F A302989 a(n) = A066141(n) * n + A000007(n).
%F A302989 From _Alois P. Heinz_, May 28 2018: (Start)
%F A302989 E.g.f.: 1/(1+LambertW(-x)) + exp(x)*(2*x+x^2).
%F A302989 a(n) = A001477(n) + A000290(n) + A000312(n). (End)
%e A302989 a(3) = 3^3 + 3*3 + 3 = 27 + 9 + 3 = 39.
%p A302989 seq(n^n+n*n+n,n=0..30); # _Muniru A Asiru_, May 27 2018
%t A302989 Join[{1},Table[n^n+n^2+n,{n,20}]] (* _Harvey P. Dale_, Jun 13 2020 *)
%o A302989 (GAP) List([1..30],n->n^n+n*n+n); # _Muniru A Asiru_, May 27 2018
%Y A302989 Cf. A000007, A000290, A000312, A001477, A066068, A066141, A214647.
%K A302989 nonn,easy
%O A302989 0,2
%A A302989 _Alex Ratushnyak_, Apr 17 2018
%E A302989 a(0)=1 prepended by _Alois P. Heinz_, May 28 2018