login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A191690 a(n) = n^n-n^(n-1)-n^(n-2)-...-n^2-n-1. 4
0, 1, 14, 171, 2344, 37325, 686286, 14380471, 338992928, 8888888889, 256780503550, 8105545862051, 277635514376232, 10257237069745861, 406615755353655134, 17216961135462248175, 775537745518440716416, 37031913482632035365105 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,3

LINKS

Danny Rorabaugh, Table of n, a(n) for n = 1..350

FORMULA

a(n) = A117667(n)-1. - Robert G. Wilson v, Apr 16 2015

a(n) = n^n - A023037(n). - Danny Rorabaugh, Apr 20 2015

EXAMPLE

a(1)=0 (=1^1-1), a(2)=1 (=2^2-2-1), a(3)=14 (=3^3-3^2-3-1), a(4)=171 (=4^4-4^3-4^2-4-1).

MAPLE

A191690 := proc(n) n^n-add( n^j, j=0..n-1) ; end proc: # R. J. Mathar, Jun 23 2011

MATHEMATICA

Table[Total[-n^Range[0, n-1]]+n^n, {n, 2, 20}] (* Harvey P. Dale, Jul 06 2011 *)

f[n_] := ((n - 2) n^n + n)/(n - 1) - 1; f[1] = 0; Array[f, 18] (* Robert G. Wilson v, Apr 16 2015 *)

PROG

(PARI) a(n) = n^n - sum(k=0, n-1, n^k); \\ Michel Marcus, Apr 16 2015

(Sage) [n^n - sum([n^k for k in range(n)]) for n in range(1, 19)] # Danny Rorabaugh, Apr 20 2015

CROSSREFS

Cf. A000312, A023037, A191686.

Sequence in context: A099158 A014882 A048443 * A016136 A277940 A061484

Adjacent sequences:  A191687 A191688 A191689 * A191691 A191692 A191693

KEYWORD

nonn

AUTHOR

Juri-Stepan Gerasimov, Jun 11 2011

STATUS

approved

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.

License Agreements, Terms of Use, Privacy Policy. .

Last modified October 16 08:50 EDT 2019. Contains 328056 sequences. (Running on oeis4.)