Calculating Percentage for a Column Based on Certain Conditions of Rows Using R and dplyr Library