7 Replace NA volume with 0 for filtering purposes

current_allocations %<>% mutate(forty_eight_hour_volume = ifelse(is.na(forty_eight_hour_volume), 0, forty_eight_hour_volume))