+- HP Forums (https://www.hpmuseum.org/forum)
+-- Forum: HP Software Libraries (/forum-10.html)
+--- Forum: General Software Library (/forum-13.html)
+--- Thread: (38G) OEIS A228297: An Interesting Irregular Sequence (/thread-9115.html)
(38G) OEIS A228297: An Interesting Irregular Sequence - Gerald H - 09-19-2017 05:08 PM
These three programmes together produce the Online Encyclopaedia of Integer Sequences' sequence A228297.
The first programme takes a positive integer input from any previous calculation & finds the integer quotient for division by 5.
eg If you enter
77
on the home screen, the programme returns
15
as Ans, which you can see on the Home screen after pressing SHIFT ENTER.
Code:
IQUOT5
(Ans-(Ans MOD 5))/5:The next programme takes a positive integer, eg 67, input from any previous calculation & calculates eg the 67th member of the OEIS sequence A27868.
https://oeis.org/A027868
Code:
A27868
Ans►A:
0►C:
DO
A:
RUN IQUOT5:
Ans►A:
Ans+C►C:
UNTIL
A==0
END:
C:Thr third programme takes a positive integer, eg 777,777,777,777, input from any previous calculation & calculates eg the 777,777,777,777th member of the OEIS sequence A228297, making use of the two programmes above.
https://oeis.org/A228297
Code:
A228297
Ans►N:
RUN IQUOT5:
N-Ans-1►M:
DO
1+M►M:
RUN A27868:
UNTIL
M+Ans≥N
END:
M: