Hello, your issue is likely that if() is not vectorised, so r provides ifelse() for that requirement.
There is a good tutorial to look at here : adv-r
If you require more direct help with your issue, please consider providing a reprex