|
| |
|
|
A074759
|
|
Number of degree-n permutations of order dividing n. Number of solutions to x^n = 1 in S_n.
|
|
0
| |
|
|
1, 2, 3, 16, 25, 396, 721, 11264, 46089, 602200, 3628801, 133494912, 479001601, 7692266960, 95904273375, 1914926104576, 20922789888001, 628693317946656, 6402373705728001, 182635841123840000, 2496321046987530021
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
FORMULA
| a(n) = n!*coefficient of x^n in expansion of exp(Sum_{k divides n} x^k/k).
|
|
|
MATHEMATICA
| Table[a = Sum[x^i/i, {i, Divisors[n]}]; Part[Range[0, 20]! CoefficientList[Series[Exp[a], {x, 0, 20}], x], n + 1], {n, 1, 20}] (* Geoffrey Critzer, Dec 04 2011 *)
|
|
|
CROSSREFS
| Cf. A074351.
Sequence in context: A092503 A147662 A074182 * A175699 A102882 A085734
Adjacent sequences: A074756 A074757 A074758 * A074760 A074761 A074762
|
|
|
KEYWORD
| easy,nonn
|
|
|
AUTHOR
| Vladeta Jovovic (vladeta(AT)eunet.rs), Sep 28 2002
|
| |
|
|
