(38G) CONNELL SEQUENCE, OEIS A001614 - Printable Version +- HP Forums (https://www.hpmuseum.org/forum) +-- Forum: HP Software Libraries (/forum-10.html) +--- Forum: General Software Library (/forum-13.html) +--- Thread: (38G) CONNELL SEQUENCE, OEIS A001614 (/thread-3626.html) (38G) CONNELL SEQUENCE, OEIS A001614 - Gerald H - 04-13-2015 07:31 AM This programme installs symbolics in the Sequence Aplet to reproduce the Connell sequence http://oeis.org/A001614 in U1, the partial sums http://oeis.org/A122793 in U2, the complement of the Connell sequence http://oeis.org/A118011 in U3 & the partial sums of U3 http://oeis.org/A171152 in U4. RUN SEQSET: RECURSE(U,2*N-U5(N),1,2)►U1(N): CHECK 1: RECURSE(U,N-U6(N)+N^2,1,3)►U2(N): CHECK 2: RECURSE(U,2*N+U5(N),3,6)►U3(N): CHECK 3: RECURSE(U,N+U6(N)+N^2,3,9)►U4(N): CHECK 4: RECURSE(U,ROUND(√(2*N),0),1,2)►U5(N): RECURSE(U,U5(N)*(N+(1-U5(N)^2)/6),1,3)►U6(N): 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):