swRrho(): give NA if fewer than four data in profile