Substitua todos os valores em uma linha por 0 se uma das variáveis tiver dados ausentes

Como o título indica, estou tentando substituir todos os valores em uma determinada linha por 0 se alguma variável tiver NA e produzir isso usando write.table. Por exemplo:

x  y  z
2  3  5
4  NA 1
3  2  1

para

x  y  z
2  3  5
0  0  0
3  2  1

No momento, meu código se parece com o seguinte

myvars <- c("x", "y", "z")
newdata <- mydata[myvars]
write.table(newdata, "data.txt", col.names=FALSE, row.names=FALSE)