Sorry, I got confused about your data so did not create a reprex.
Could you edit your code as below and see if this will result in something that you are thinking of?
This way each row will be normalized based on the mean value of controls for each line.
dummy %>%
group_by(line) %>%
mutate(ctrl=prol/mean(prol[dop=="control"])*100)