Added TEST for rpra()  function
Fixed rpra() bug