This should work:
library(dplyr) Process_ID %>% mutate(Process_ID_number = if_else(Process_ID == 74250, 1, 0))
Next time, provide a reproducible example: