r ändern den Spaltenwert bedingt

df <- within(df, est[b==0] <- (a[b==0]-5)/2.533)
Strange Snake