mutate_vars function

Conditional update of columns in data.table