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

[DavidM]

Interesting puzzle, interesting approaches!

Code:




Spoiler spoiler...







\<<
   0.
   { DUP 1. n DUP + START NEXTPRIME NEXT }
   'n'
   PICK3
   5. ROLL
   1.
   SEQ
   NIP
\>>

The SEQ command actually builds a UserRPL FOR loop behind the 
scenes. So I'm guessing its performance should be about the same 
as a FOR loop approach (perhaps slightly slower for the overhead 
to build the loop). 

I'll also experiment with some list-based code for this. The 
memory requirements would go up (both for the code and run-time 
needs), but it may perform a little better.