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!)
A300822 Möbius transform of A300222. 4
0, 2, 0, -2, 2, 4, 6, 8, 0, -4, 2, -4, 0, -6, 4, -2, 8, 12, 18, 22, 12, 14, 20, 16, 22, 24, 0, 0, 2, -8, 0, -4, 4, -4, 0, -12, 0, -18, 0, -28, 2, -12, 6, -8, 12, -4, 20, -4, 12, -2, 16, 0, 26, 36, 50, 48, 36, 50, 56, 44, 60, 60, 36, 52, 54, 28, 54, 52, 40, 60, 62, 48, 72, 72, 44, 72, 66, 48, 78, 82, 0, -4, 2, 0, -10, -6, 4, -10, 8, -24, -6, -14, 0 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

LINKS

Antti Karttunen, Table of n, a(n) for n = 1..65537

FORMULA

a(n) = Sum_{d|n} moebius(n/d)*A300222(d).

a(n) = A000010(n) - A300821(n).

a(n) = A300222(n) - A300824(n).

MATHEMATICA

Table[DivisorSum[n, MoebiusMu[n/#] FromDigits[IntegerDigits[#, 3] /. 1 -> 0, 3] &], {n, 93}] (* Michael De Vlieger, Mar 17 2018 *)

PROG

(PARI)

A300222(n) = fromdigits(apply(x->(if (1==x, 0, x)), digits(n, 3)), 3);

A300822(n) = sumdiv(n, d, moebius(n/d)*A300222(d));

CROSSREFS

Cf. A000010, A300222, A300821, A300824.

Sequence in context: A279158 A273166 A331262 * A118658 A165912 A301823

Adjacent sequences:  A300819 A300820 A300821 * A300823 A300824 A300825

KEYWORD

sign,base

AUTHOR

Antti Karttunen, Mar 14 2018

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 October 17 00:35 EDT 2021. Contains 348048 sequences. (Running on oeis4.)