cp's OEIS Frontend

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.

Showing 1-2 of 2 results.

A109392 Partial sums of A109391.

Original entry on oeis.org

0, 1, 13, 175, 2735, 49610, 1029386, 24088590, 628068366, 18061990371, 568061990371, 19398632250697, 714854467214665, 28276489167109688, 1195037205850701368, 53742304051553826368, 2562499498076052846144
Offset: 0

Views

Author

Rick L. Shepherd, Jun 27 2005

Keywords

Comments

The sum of all the terms of all A001923(n) sequences having up to n terms all chosen from {1,2,...,n}.

Crossrefs

Cf. A109391, A001923 (sum k^k, k=1..n).

A209290 Number of elements whose preimage is the empty set summed over all functions f:{1,2,...,n}->{1,2,...,n}.

Original entry on oeis.org

0, 0, 2, 24, 324, 5120, 93750, 1959552, 46118408, 1207959552, 34867844010, 1100000000000, 37661140520652, 1390911669927936, 55123269399790046, 2333521433367183360, 105094533691406250000, 5017514388048998039552, 253135520137219049838162, 13456471561751415850795008
Offset: 0

Views

Author

Geoffrey Critzer, Jan 16 2013

Keywords

Comments

a(n)/n^n is the expected value of the number of such elements which approaches n/e as n gets large.
a(n) = Sum_{k=1..n} A219859(n,k)*k.
a(n) = 2 * A109391(n-1) = 2 * A000217(n-1) * A000312(n-1) for n>0.
a(n-1) is the number of length-n words of n-1 letters where adjacent letters are distinct, see example. - Joerg Arndt, Jun 10 2013

Examples

			From _Joerg Arndt_, Jun 10 2013: (Start)
There are a(4-1)=a(3)=24 length-4 words of 3 letters (0,1,2) where adjacent letters are distinct:
01:  [ 0 1 0 1 ]
02:  [ 0 1 0 2 ]
03:  [ 0 1 2 0 ]
04:  [ 0 1 2 1 ]
05:  [ 0 2 0 1 ]
06:  [ 0 2 0 2 ]
07:  [ 0 2 1 0 ]
08:  [ 0 2 1 2 ]
09:  [ 1 0 1 0 ]
10:  [ 1 0 1 2 ]
11:  [ 1 0 2 0 ]
12:  [ 1 0 2 1 ]
13:  [ 1 2 0 1 ]
14:  [ 1 2 0 2 ]
15:  [ 1 2 1 0 ]
16:  [ 1 2 1 2 ]
17:  [ 2 0 1 0 ]
18:  [ 2 0 1 2 ]
19:  [ 2 0 2 0 ]
20:  [ 2 0 2 1 ]
21:  [ 2 1 0 1 ]
22:  [ 2 1 0 2 ]
23:  [ 2 1 2 0 ]
24:  [ 2 1 2 1 ]
(End)
		

Crossrefs

Cf. A219859.

Programs

  • Mathematica
    Table[n (n-1)^n,{n,0,20}]
  • PARI
    a(n) = n*(n-1)^n; \\ Michel Marcus, Aug 22 2017

Formula

a(n) = n*(n - 1)^n.
Showing 1-2 of 2 results.