This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A053593 Closed 3-dimensional ball numbers (version 2): a(n)= number of integer points (i,j,k) contained in a closed ball of diameter n, centered at (1/2,0,0). 1
 0, 2, 2, 20, 28, 70, 110, 192, 256, 402, 498, 708, 884, 1166, 1422, 1800, 2104, 2594, 3026, 3588, 4140, 4918, 5542, 6432, 7224, 8186, 9122, 10380, 11460, 12790, 14094, 15624, 17080, 18882, 20458, 22500, 24364, 26590, 28678, 31136, 33400 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0,2 COMMENTS a(n)/(n/2)^3->4/3*Pi LINKS Robert Israel, Table of n, a(n) for n = 0..2000 MAPLE N:= 100: # to get a(0)..a(N) B:= Array(0..N^2): B[0]:= 1: for x from 1 to N do   for y from 0 to x do     r:= x^2 + y^2;     if r > N^2 then break fi;     if y=0 or y=x then B[r]:= B[r]+4 else B[r]:= B[r]+8 fi od od: BL:= convert(B, list): SL:= ListTools:-PartialSums(BL): f:= n ->   add(SL[floor((n^2+3)/4-x^2+x)], x=ceil(1/2-n/2)..n/2+1/2): seq(f(n), n=0..N); # Robert Israel, Apr 09 2018 CROSSREFS Sequence in context: A103129 A322898 A009340 * A002907 A184717 A134046 Adjacent sequences:  A053590 A053591 A053592 * A053594 A053595 A053596 KEYWORD easy,nonn AUTHOR Klaus Strassburger (strass(AT)ddfi.uni-duesseldorf.de), Jan 19 2000 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 October 15 19:25 EDT 2019. Contains 328037 sequences. (Running on oeis4.)