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

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A325313 a(n) = A048250(n) - n, where A048250(n) is the sum of squarefree divisors of n. 17
 0, 1, 1, -1, 1, 6, 1, -5, -5, 8, 1, 0, 1, 10, 9, -13, 1, -6, 1, -2, 11, 14, 1, -12, -19, 16, -23, -4, 1, 42, 1, -29, 15, 20, 13, -24, 1, 22, 17, -22, 1, 54, 1, -8, -21, 26, 1, -36, -41, -32, 21, -10, 1, -42, 17, -32, 23, 32, 1, 12, 1, 34, -31, -61, 19, 78, 1, -14, 27, 74, 1, -60, 1, 40, -51, -16, 19, 90, 1, -62, -77, 44, 1, 12, 23, 46 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,6 LINKS Antti Karttunen, Table of n, a(n) for n = 1..16384 Antti Karttunen, Data supplement: n, a(n) computed for n = 1..65537 FORMULA a(n) = A048250(n) - n. a(n) = A325314(n) - A033879(n). a(A228058(n)) = -A325319(n). MATHEMATICA Array[DivisorSum[#, # &, SquareFreeQ] - # &, 86] (* Michael De Vlieger, Apr 21 2019 *) PROG (PARI) A048250(n) = factorback(apply(p -> p+1, factor(n)[, 1])); A325313(n) = (A048250(n) - n); CROSSREFS Cf. A033879, A048250, A126795, A228058, A325314, A325315, A325319, A325320. Sequence in context: A197296 A177838 A088537 * A019847 A021946 A257704 Adjacent sequences:  A325310 A325311 A325312 * A325314 A325315 A325316 KEYWORD sign AUTHOR Antti Karttunen, Apr 21 2019 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.

Last modified April 22 16:32 EDT 2021. Contains 343177 sequences. (Running on oeis4.)