login
This site is supported by donations to The OEIS Foundation.

 

Logo

Annual Appeal: Please make a donation (tax deductible in USA) to keep the OEIS running. Over 5000 articles have referenced us, often saying "we discovered this result with the help of the OEIS".

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A078930 Let r+i*s be the sum of the distinct first-quadrant Gaussian integers dividing n; sequence gives r+s values. 4
1, 5, 4, 13, 12, 20, 8, 29, 13, 56, 12, 52, 24, 40, 48, 61, 28, 65, 20, 144, 32, 60, 24, 116, 81, 112, 40, 104, 44, 224, 32, 125, 48, 136, 96, 169, 52, 100, 96, 320, 60, 160, 44, 156, 156, 120, 48, 244, 57, 369, 112, 288, 72, 200, 144, 232, 80, 212, 60, 576, 84, 160, 104 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

COMMENTS

A078910(n)-A078911(n) = A000203(n).

Also equal to the sum of all divisors of n (in Z[i]) having positive real part. - M. F. Hasler, Nov 22 2007

LINKS

M. F. Hasler, Table of n, a(n) for n = 1..1000.

Project Euler, Problem 153: Investigating Gaussian Integers.

FORMULA

a(n) = A078910(n)+A078911(n).

a(n) = A000203(n)+2*A078911(n). - M. F. Hasler, Nov 22 2007

PROG

(PARI) A078930(n, S=[])=sigma(n)+sumdiv(n*I, d, if(real(d)&imag(d)&!setsearch(S, d=vecsort(abs([real(d), imag(d)]))), S=setunion(S, [d]); (d[1]+d[2])<<(d[1]!=d[2]))) - M. F. Hasler, Nov 22 2007

CROSSREFS

Sequence in context: A215947 A226555 A147685 * A094414 A158867 A107984

Adjacent sequences:  A078927 A078928 A078929 * A078931 A078932 A078933

KEYWORD

nonn

AUTHOR

Vladeta Jovovic, Jan 11 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 | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy .

Last modified December 11 03:15 EST 2016. Contains 279034 sequences.