Mam następującą ramkę danych

   id f1 f2
1  a  1  3
2  b  3  5
3  c  4  7

Chciałbym zastąpić wszystkie wiersze, które mają f1> 3 wierszem (id = x, f1 = 0, f2 = 0) Tak więc powyższe mapuje się na

   id f1 f2
1  a  1  3
2  b  3  5
3  x  0  0

Ale kiedy próbowałem

replace(x,which(x$f1>3),data.frame(id = 'x',f1=0,f2=0))

To nie zrobiło tego dobrze, dało

   id f1 f2
1  a  1  x
2  b  3  x
3  c  4  x
Warning message:
In `[<-.data.frame`(`*tmp*`, list, value = list(id = 1L, f1 = 0,  :
  provided 3 variables to replace 1 variables

Czy ktoś mógłby zasugerować sposób na to w skali? Dzięki.