A173314 a(n) = 6*n!+1.

7, 7, 13, 37, 145, 721, 4321, 30241, 241921, 2177281, 21772801, 239500801, 2874009601, 37362124801, 523069747201, 7846046208001, 125536739328001, 2134124568576001, 38414242234368001, 729870602452992001

Offset

0,1

Links

Vincenzo Librandi, Table of n, a(n) for n = 0..200

Formula

a(0)=7, a(n) = n*a(n-1)-n+1. - _Vincenzo Librandi_, Sep 29 2013

Example

For n=0, a(0)=7; n=1,a(1)=7; n=2, a(2)=13; n=3, a(3)=37; n=4, a(4)=145.

Mathematica

Table[6 n! + 1, {n, 0, 25}] (* _Vincenzo Librandi_, Sep 29 2013 *)

Prog

(Magma) [6*Factorial(n) + 1: n in [0..25]]; /* or */ [7] cat [n eq 1 select n+6 else n*Self(n-1)-n+1: n in [1..25] ]; // _Vincenzo Librandi_, Sep 29 2013

Crossrefs

Cf. sequences of the type k*n!+1: A038507 (k=1), A052898 (k=2), A173324 (k=3), A173322 (k=4), A173319 (k=5), this sequence (k=6).

Sequence in context: A317790 A109539 A109541 * A040043 A339706 A355897

Adjacent sequences: A173311 A173312 A173313 * A173315 A173316 A173317

Keyword

nonn

Author

_Vincenzo Librandi_, Feb 16 2010

Status

approved