A062098 a(n) = 7 * n!.

7, 14, 42, 168, 840, 5040, 35280, 282240, 2540160, 25401600, 279417600, 3353011200, 43589145600, 610248038400, 9153720576000, 146459529216000, 2489811996672000, 44816615940096000, 851515702861824000

Offset: 1

Author

Dan Henry (daniel.henry(AT)umit.maine.com), Jun 28 2001

Keywords

• nonn
• easy

Links

• Harry J. Smith, Table of n, a(n) for n = 1..100
• Luis Manuel Rivera, Integer sequences and k-commuting permutations, arXiv preprint arXiv:1406.3081 [math.CO], 2014-2015.

Programs

GAP

List([1..20],n->7*Factorial(n)); # Muniru A Asiru, Jul 01 2018

Maple

G(x):=(x-8)/(1-x): f[0]:=G(x): for n from 1 to 19 do f[n]:=diff(f[n-1],x) od: x:=0: seq(-f[n],n=1..19); # Zerinvary Lajos, Apr 03 2009

Mathematica

Array[7 #! &, 19] (* Michael De Vlieger, Jul 01 2018 *)

PARI

{ a=7; for (n=1, 100, write("b062098.txt", n, " ", a*=n) ) } \\ Harry J. Smith, Aug 01 2009

Formula

a(n) = n*a(n-1), a(1) = 7.

a(n) = 7 * A000142(n) for n>0. - Michel Marcus, Aug 31 2013

Extensions

More terms from Larry Reeves (larryr(AT)acm.org), Jul 05 2001

Offset changed from 7 to 1 by Harry J. Smith, Aug 01 2009