How to divide values in another column across two different factors of a group?

Question

I\'m working with {tidyverse} in R and I would like to do something that is somewhat complicated.

> col_vict %>%