RPL mini-challenge - Triangle of Primes (HP-49G/G+,50g)

[Gerson W. Barbosa]

(07-03-2019 10:33 PM)Claudio L. Wrote:  

(07-03-2019 08:00 PM)Gerson W. Barbosa Wrote:  Thank you all for your interest, comments and great contributions!

Wait, wait!

I have 2 more... neither will be winners of anything, just different approaches to those presented before.

The first one is literal translation of the algorithm you just revealed, except 'q' counts with step 1 and NEXTPRIME is done in pairs:

Code:


«
  0 SWAP 2 0 ROT START
    SWAP OVER 0 PICK3
    START
      NEXTPRIME NEXTPRIME
    NEXT
    SWAP 1 + SWAP 
  NEXT
  DROP →LIST 
»

Looks like we should update the Hall of Fame:

Claudio L: 405.2275 s, 68.5 bytes

I am glad the 70-byte barrier has been broken. Let’s see how far this goes :-)