Error Message in if statement for trying to plot brownian motion in r

I need to reach the unit circle i.e. Xt and Yt=1 but when I try and include an if statement in the code, I get an error message