Мы можем использовать .(
library(data.table)
lapply(mget(data_tables),function(x)x[, .(name)])
Или указать столбец / столбцы в .SDcols
и подмножество .SD
lapply(mget(data_tables),function(x)x[, .SD, .SDcols = 'name'])
Или, если мы хотим извлечь как вектор, используйте [[
lapply(mget(data_tables),function(x) x[["name"]])