This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A007925 a(n) = n^(n+1) - (n+1)^n. 18

%I

%S -1,-1,-1,17,399,7849,162287,3667649,91171007,2486784401,74062575399,

%T 2395420006033,83695120256591,3143661612445145,126375169532421599,

%U 5415486851106043649,246486713303685957375,11877172892329028459041

%N a(n) = n^(n+1) - (n+1)^n.

%D G. Everest, A. van der Poorten, I. Shparlinski and T. Ward, Recurrence Sequences, Amer. Math. Soc., 2003; see esp. p. 255.

%H T. D. Noe, <a href="/A007925/b007925.txt">Table of n, a(n) for n = 0..100</a>

%H Sergio Silva, <a href="http://ginasiomental.no.sapo.pt/materialc/mteste/teste.htm">Teste Numerico</a>, Item 3.

%H H. J. Smith, <a href="http://harry-j-smith-memorial.com/Display/xyyx.html">Contour Plot of z = x^y - y^x</a>

%F Asymptotic expression for a(n) is a(n) ~ n^n * (n - e). - Ahmed Fares (ahmedfares(AT)my-deja.com), Apr 19 2001

%e a(2) = 1^2 - 2^1 = -1, a(4) = 3^4 - 4^3 = 17.

%p A007925:=n->n^(n+1)-(n+1)^n: seq(A007925(n), n=0..25); # _Wesley Ivan Hurt_, Jan 10 2017

%t lst={};Do[AppendTo[lst, (n^(n+1)-((n+1)^n))], {n, 0, 4!}];lst (* _Vladimir Joseph Stephan Orlovsky_, Sep 19 2008 *)

%t #^(#+1)-(#+1)^#&/@Range[0,20] (* _Harvey P. Dale_, Oct 22 2011 *)

%o (Maxima) A007925[n]:=n^(n+1)-(n+1)^n\$ makelist(A007925[n],n,0,30); /* _Martin Ettl_, Oct 29 2012 */

%o (PARI) a(n)=n^(n+1)-(n+1)^n \\ _Charles R Greathouse IV_, Feb 06 2017

%Y Cf. A051442.

%K sign,easy,nice

%O 0,4

%A Dennis S. Kluk (mathemagician(AT)ameritech.net)

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified October 14 02:29 EDT 2019. Contains 327995 sequences. (Running on oeis4.)