Update step_dues to parse out Associate vs. Affiliate

Minor update to parse out Associate vs. Affiliate in `MD_Number` categories
SzarR · Feb 6, 2024 · 1ac0dfa · 1ac0dfa
1 parent b1480e2
commit 1ac0dfa
Showing 1 changed file with 4 additions and 3 deletions.
diff --git a/R/step_dues.R b/R/step_dues.R
@@ -36,9 +36,10 @@ step_dues <- function(df, year) {
         case_when(
           Membership_Dues == "Student Affiliate" ~ 1,
           Membership_Dues == "Associate" ~ 2,
-          Membership_Dues == "Affiliate" ~ 2,
-          Membership_Dues == "International Affiliate" ~ 3,
-          Membership_Dues == "International Associate" ~ 3,
+          Membership_Dues == "Affiliate" ~ 3,
+          # Do not need to differentiate across US vs. international
+          #Membership_Dues == "International Affiliate" ~ 3,
+          #Membership_Dues == "International Associate" ~ 3,
           Membership_Dues == "Member" ~ 4,
           Membership_Dues == "Fellow" ~ 5,
           Membership_Dues == "Retired International" ~ 6,