diff --git a/scripts/4_check_matching_of_epigenetic_sex.Rmd b/scripts/4_check_matching_of_epigenetic_sex.Rmd
index 98c4e00..7554c19 100644
--- a/scripts/4_check_matching_of_epigenetic_sex.Rmd
+++ b/scripts/4_check_matching_of_epigenetic_sex.Rmd
@@ -68,7 +68,7 @@ If you have any sex mismatches, they will be displayed in the table above as red
 ```{r, test sex matches}
 mismatch_check_df <- sex_df %>%
   select(reported_sex, predicted_sex) %>%
-  rowwise %>%
+  rowwise() %>%
   mutate(match = n_distinct(unlist(cur_data())) == 1) %>%
   ungroup()