|
| |
|
|
A137149
|
|
a(n)= (Prime[n])!/(Prime[n] EulerPhi[Prime[n]]).
|
|
1
| |
|
|
1, 1, 6, 120, 362880, 39916800, 1307674368000, 355687428096000, 51090942171709440000, 10888869450418352160768000000, 8841761993739701954543616000000
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,3
|
|
|
COMMENTS
| Degree of Lagrange resolvent of polynomial prime degree. Ratio: degree of symmetric group of prime order n divided by order metacyclic group of prime order n. For degree of Lagrange resolvent of polynomial not prime degree see A137150.
|
|
|
MATHEMATICA
| Table[(Prime[n])!/(Prime[n] EulerPhi[Prime[n]]), {n, 1, 20}]
|
|
|
CROSSREFS
| Cf. A058161, A137150.
Sequence in context: A007539 A040996 A110442 * A053710 A126244 A138572
Adjacent sequences: A137146 A137147 A137148 * A137150 A137151 A137152
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Artur Jasinski (grafix(AT)csl.pl), Jan 23 2008
|
| |
|
|
