[R-br] Evitar gravação

Meus amigos, o meu problema é como fazer com que um arquivo não seja gravado se na etapa anterior do programa acontece um erro. No exemplo, eu não gostaria que o arquivo .csv fosse gravado pois aconteceu um erro na etapa anterior do programa. Exemplo:

arquivo1= merge(arquivo1, arquivo99, by = "code6", all.x = TRUE)

arquivo1l$2004t1 = ifelse(is.na(arquivo1$i2004t1), 100, arquivo1$i2004t1) Erro: constante numérica inesperado em "serie_bmovel$2004"

write.csv2(arquivo1, "\\arquivo1.csv", row.names = FALSE)