OFFSET
0,2
COMMENTS
Volume of a sphere of radius n, rounded down.
LINKS
Harry J. Smith, Table of n, a(n) for n = 0..1000
FORMULA
a(n) = floor((4/3)*Pi*n^3).
a(n) = A135973(n) - 1 for n > 0.
MATHEMATICA
Table[ Floor[(4/3)Pi*n^3], {n, 0, 50} ]
PROG
(PARI) { for (n=0, 1000, write("b066645.txt", n, " ", floor((4/3)*Pi*n^3)) ) } \\ Harry J. Smith, Mar 16 2010
(Maxima) A066645(n):=floor((4/3)*%pi*n^3)$
makelist(A066645(n), n, 1, 30); /* Martin Ettl, Nov 03 2012 */
(Sage)
n=100 # change n for more values
[floor(4/3*pi*r^3) for r in [0..n]] # Tom Edgar, Oct 10 2013
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Amarnath Murthy, Dec 29 2001
EXTENSIONS
More terms from Robert G. Wilson v, Jan 03 2002
0 prepended by T. D. Noe, Oct 10 2013
STATUS
approved