Ranking Row Values in R While Keeping NA Values Intact: Customizing the `rank()` Function for Accurate Results