R data.table multi columna recodificación / subasignación [duplicado]

Esta pregunta ya tiene una respuesta aquí:

La forma más rápida de reemplazar NA en una gran tabla de datos. 8 respuestas

Deje que DT sea una tabla de datos:

DT<-data.table(V1=sample(10),
               V2=sample(10),
               ...
               V9=sample(10),)

¿Existe un método mejor / más simple para hacer recodificación / subasignación de varias columnas como esta:

DT[V1==1 | V1==7,V1:=NA]
DT[V2==1 | V2==7,V2:=NA]
DT[V3==1 | V3==7,V3:=NA]
DT[V4==1 | V4==7,V4:=NA]
DT[V5==1 | V5==7,V5:=NA]
DT[V6==1 | V6==7,V6:=NA]
DT[V7==1 | V7==7,V7:=NA]
DT[V8==1 | V8==7,V8:=NA]
DT[V9==1 | V9==7,V9:=NA]

Los nombres de las variables son completamente arbitrarios y no necesariamente tienen números. Muchas columnas (Vx: Vx) y un patrón de recodificación para todos (NAME == 1 | NAME == 7, NAME: = algo).

Y además, cómo subasignar varias columnas de NA a otra cosa. Por ejemplo, en estilo data.frame:

data[,columns][is.na(data[,columns])] <- a_value

Respuestas a la pregunta(1)

Su respuesta a la pregunta