Работа со строками в data.table

Question

Я хотел бы рассчитать автоматически и ввести строку Qout, значения как разность ВСЕГО - C29.Как это сделать просто?

 DT <- data.table(induse = c("C29", "P7","TOTAL"), values = c(570,100,600))
 DT2 <- data.table(induse = c("C29", "P7","TOTAL","Qout"), values =c(570,100,600,30))

Спасибо.