(38G) A004396 & Partial Sum

[Gerald H]

Her is a progamme to insert symbolics in the Sequence Aplet to reproduce the sequence

http://oeis.org/A004396

& the challenge is to find a closed formula for the partial sums of A004396.

Edit: Challenge withdrawn, 2015-04-12 (Vienna date).

E*1O*2

RUN SEQSET:
RECURSE(U,INT((2*N-1)/3),0,1)\|>U1(N):
CHECK 1:

SEQSET

SELECT Sequence:
UNCHECK 0:
0►NumFont:
0►Simult:
2►Angle:
1►InvCross:
1►NumStep:
1►Format:
1►NumCol:
1►NumStart:
6►NumRow:
RECURSE(U,0,0,0)►U1(N):
Ans►U2(N):
Ans►U3(N):
Ans►U4(N):
Ans►U5(N):
Ans►U6(N):
Ans►U7(N):
Ans►U8(N):
Ans►U9(N):
Ans►U0(N):

[Gerald H]

Partial sums of A004396:

RECURSE(U,CEILING((N-1)/3*N),0,1)►U2(N):
CHECK 2: