login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A353381 Number of divisors of n not in A353355. 3
0, 1, 1, 1, 1, 2, 1, 1, 1, 3, 1, 2, 1, 2, 2, 2, 1, 2, 1, 3, 3, 3, 1, 3, 1, 2, 1, 2, 1, 5, 1, 2, 2, 3, 2, 2, 1, 2, 3, 4, 1, 5, 1, 3, 2, 3, 1, 4, 1, 3, 2, 2, 1, 3, 3, 3, 3, 2, 1, 5, 1, 3, 3, 2, 2, 5, 1, 3, 2, 5, 1, 3, 1, 2, 2, 2, 2, 5, 1, 6, 2, 3, 1, 5, 3, 2, 3, 4, 1, 5, 3, 3, 2, 3, 2, 4, 1, 2, 2, 3, 1, 5, 1, 3, 5 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,6
LINKS
FORMULA
a(n) = Sum_{d|n} 1-A353380(d).
a(n) = A000005(n) - A353382(n).
a(p) = 1 for all primes p.
a(n) = a(A003961(n)) = a(A348717(n)), for all n >= 1.
PROG
(PARI)
A332823(n) = { my(f = factor(n), u=(sum(k=1, #f~, f[k, 2]*2^primepi(f[k, 1]))/2)%3); if(2==u, -1, u); };
A353354(n) = sumdiv(n, d, A332823(d));
A353380(n) = (0==A353354(n));
A353381(n) = sumdiv(n, d, !A353380(d));
CROSSREFS
Sequence in context: A175307 A324825 A316557 * A032436 A360615 A280274
KEYWORD
nonn
AUTHOR
Antti Karttunen, Apr 19 2022
STATUS
approved

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified July 18 05:05 EDT 2024. Contains 374377 sequences. (Running on oeis4.)