login
a(n) = Sum_{i=0,1,2,..; n-k*i >= -n} |n-k*i| for k=4.
0

%I #11 Jul 03 2017 15:17:53

%S 9,16,16,24,25,36,36,48,49,64,64,80,81,100,100

%N a(n) = Sum_{i=0,1,2,..; n-k*i >= -n} |n-k*i| for k=4.

%D F. Smarandache, Back and Forth Factorials, Arizona State Univ., Special Collections, 1972.

%D F. Smarandache, Back and Forth Summants, Arizona State Univ., Special Collections, 1972.

%H J. Dezert, ed., <a href="http://www.mathematicsmagazine.com/corresp/J_Dezert/JDezert.htm">Smarandacheials (1)</a>, Mathematics Magazine for Grades 1-12, No. 4, 2004.

%H J. Dezert, ed., <a href="http://www.mathematicsmagazine.com/corresp/J_Dezert/JDezert2.htm">Smarandacheials (2)</a>, Mathematics Magazine for Grades 1-12, No. 4, 2004.

%H F. Smarandache, <a href="http://www.gallup.unm.edu/~smarandache/Summants.htm">Summants</a> [Broken link]

%p S := proc(n,k) local a,i ; a :=0 ; i := 0 ; while n-k*i >= -n do a := a+abs(n-k*i) ; i := i+1 ; od: RETURN(a) ; end: k := 4: seq(S(n,k),n=k+1..80) ; # _R. J. Mathar_, Feb 01 2008 (Adapted from program for A092096 by _N. J. A. Sloane_, Jul 03 2017)

%Y Cf. A001044, A092396, A092397, A092398, A092399, A092971, A092972, A092973, A092974.

%K nonn,more

%O 4,1

%A Jahan Tuten (jahant(AT)indiainfo.com), Mar 29 2004

%E Edited with better definition by _Omar E. Pol_, Dec 28 2008

%E Entry revised by _N. J. A. Sloane_, Jul 03 2017