Вообще, в дата.тейбл есть ключевое слово .SD - по дефолту оно означает все колонки, но можно указать .SDcols, чтобы явно перечислить нужные колонки.
В целом, чтобы добавить вычисление в качестве последней строки, я бы сделал rbind и все.
Я не у компа, но что-то типа
rbind(dt, dt[, lapply(.SD, sum)])
Попробовал с чуть другим примером, и чего то не получается. Вот, например, создание столбца с общим итогом (ну надо сделать мне "сводную таблицу как в экселе" из 2 млн строк 😂). Первая строка - получается то что нужно, а во второй говорит, что аргумент FUN пропущен ) То есть мой sum ) То есть как именно .SDcols то юзануть?)