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!)
A082053 Sum of divisors of n that are not of the form 4k+3. 2
1, 3, 1, 7, 6, 9, 1, 15, 10, 18, 1, 25, 14, 17, 6, 31, 18, 36, 1, 42, 22, 25, 1, 57, 31, 42, 10, 49, 30, 54, 1, 63, 34, 54, 6, 88, 38, 41, 14, 90, 42, 86, 1, 73, 60, 49, 1, 121, 50, 93, 18, 98, 54, 90, 6, 113, 58, 90, 1, 150, 62, 65, 31, 127, 84, 130, 1, 126, 70, 102, 1, 192 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

COMMENTS

a(A002145(n))=1.

LINKS

Vincenzo Librandi, Table of n, a(n) for n = 1..10000

FORMULA

G.f.: Sum_{k>=1} x^k*(1 + 2*x^k + 4*x^(3*k) + 3*x^(4*k) + 2*x^(5*k))/(1 - x^(4*k))^2. - Ilya Gutkovskiy, Sep 12 2019

MATHEMATICA

sd[n_]:= Total[Select[Divisors[n], !IntegerQ[(# - 3) / 4]&]]; Array[sd, 100] (* Vincenzo Librandi, May 17 2013 *)

PROG

(PARI) for(n=1, 100, print1(sumdiv(n, d, if(d%4!=3, d))", "))

CROSSREFS

Cf. A000203, A050449, A050452, A050460, A078181, A078182, A082052.

Sequence in context: A046913 A118228 A245684 * A322753 A136035 A132307

Adjacent sequences:  A082050 A082051 A082052 * A082054 A082055 A082056

KEYWORD

nonn,easy

AUTHOR

Ralf Stephan, Apr 02 2003

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 April 14 12:11 EDT 2021. Contains 342949 sequences. (Running on oeis4.)