迭代R中所有行的最有效方法是什么？

Question

for (i in 1:nrow(df2)){

if (df2$FLAG[i]==0) {df2$AGE[i]<-50}}

df2是一个包含大约500,000行的数据框。所以这需要花很多时间来运行。 有没有办法在R中优化这个？