login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A232821 a(n) = n^(n-1) - Sum_{k=1..n-1} k^(k-1). 1
1, 1, 6, 52, 549, 7075, 109172, 1971026, 40823443, 954730001, 24892154602, 716025676088, 22528094057193, 769646697066375, 28375143175948712, 1122910795732014438, 47478259662185188967, 2136067435649547983973, 101891594614083396452878 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,3
LINKS
FORMULA
a(n) = n^(n-1) - A060946(n-1).
a(n) = A000169(n) - Sum_{k=1..n-1} A000169(k).
EXAMPLE
6^5 - 5^4 - 4^3 - 3^2 - 2^1 - 1^0 = 7075 so a(6) = 7075.
MATHEMATICA
a[n_] := n^(n - 1) - Sum[i^(i - 1), {i, 1, n - 1}]; Table[a[n], {n, 20}] (* Carlos Eduardo Olivieri, May 29 2015 *)
PROG
(Python)
def sub(n):
..num = n**(n-1)
..for i in range(0, n-1):
......num -= (i+1)**i
..return num
n = 1
while n < 100:
..print(sub(n), end=', ')
..n += 1
(PARI) vector(20, n, n^(n-1)-sum(i=1, n-1, i^(i-1))) \\ Derek Orr, Apr 05 2015
CROSSREFS
Sequence in context: A357154 A365194 A365755 * A355162 A127133 A243249
KEYWORD
nonn,easy
AUTHOR
Derek Orr, Nov 30 2013
EXTENSIONS
Name edited by Derek Orr, Apr 05 2015
STATUS
approved

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 28 05:39 EDT 2024. Contains 371235 sequences. (Running on oeis4.)