|
| |
|
|
A130087
|
|
a(n) = denominator of product{k=1 to n} k^mu(k), where mu(k) = A008683(k).
|
|
4
| |
|
|
1, 2, 6, 6, 30, 5, 35, 35, 35, 7, 77, 77, 1001, 143, 143, 143, 2431, 2431, 46189, 46189, 46189, 4199, 96577, 96577, 96577, 7429, 7429, 7429, 215441, 215441, 6678671, 6678671, 6678671, 392863, 392863, 392863, 14535931, 765049, 765049, 765049
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
COMMENTS
| a(n) is also the denominator of HarmonicNumber[n]^2*(n!) - John M. Campbell, May 13, 2011
|
|
|
MAPLE
| with(numtheory): a:=n->denom(product(k^mobius(k), k=1..n)): seq(a(n), n=1..50); - Emeric Deutsch (deutsch(AT)duke.poly.edu), May 11 2007
|
|
|
MATHEMATICA
| Table[Denominator[HarmonicNumber[n]^2*(n!)], {n, 1, 200}]
|
|
|
CROSSREFS
| Cf. A130086, A130088, A130089.
Sequence in context: A105725 A005226 A087310 * A085087 A072983 A055204
Adjacent sequences: A130084 A130085 A130086 * A130088 A130089 A130090
|
|
|
KEYWORD
| frac,nonn
|
|
|
AUTHOR
| Leroy Quet May 06 2007
|
|
|
EXTENSIONS
| More terms from Emeric Deutsch (deutsch(AT)duke.poly.edu), May 11 2007
|
| |
|
|
