login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A099740 a(n) = Sum{k|n} k!*mu(k), where mu() is the Moebius function. 1
1, -1, -5, -1, -119, 713, -5039, -1, -5, 3628679, -39916799, 713, -6227020799, 87178286159, 1307674367875, -1, -355687428095999, 713, -121645100408831999, 3628679, 51090942171709434955, 1124000727777567763199, -25852016738884976639999, 713, -119, 403291461126605629356979199 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,3

COMMENTS

a(2^k)=1, a(3^k)=5, a(5^k)=119, a(6*2^i*3^j)=713, a(7^k)=5039, a(10*2^i*5^j)=3628679, etc. - Robert G. Wilson v, Nov 12 2004

LINKS

Table of n, a(n) for n=1..26.

FORMULA

G.f.: Sum_{k>=1} mu(k)*k!*x^k/(1 - x^k). - Ilya Gutkovskiy, Feb 19 2017

MATHEMATICA

f[n_] := Block[{k = Divisors[n]}, Plus @@ (k!MoebiusMu[k])]; Table[ f[n], {n, 25}] (* Robert G. Wilson v, Nov 12 2004 *)

PROG

(PARI) a(n) = sumdiv(n, d, d!*moebius(d)); \\ Michel Marcus, Feb 19 2017

CROSSREFS

Cf. A000142, A008683.

Sequence in context: A294258 A294260 A113114 * A133002 A272755 A293572

Adjacent sequences:  A099737 A099738 A099739 * A099741 A099742 A099743

KEYWORD

sign

AUTHOR

Leroy Quet, Nov 09 2004

EXTENSIONS

More terms from Robert G. Wilson v, Nov 12 2004

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified August 4 09:03 EDT 2020. Contains 336201 sequences. (Running on oeis4.)