HP 49G Programming Challenge: OEIS A014261, Integers with exclusively Odd Digits

[Didier Lachieze]

My RPL is a bit rusty, so instead here is an HP Prime program:

Code:

EXPORT IntOdd(N)  
BEGIN  
    10*IFTE(N<=5,0,IntOdd(IP((N-1)/5)))+2*((N-1) MOD 5)+1;
END;

IntOdd(50) returns 179 in 0.5ms on my Prime.