I have the following data.table:
require(data.table) dt = data.table( id = c(rep(\'Grp 1\', 31), rep(\'Grp 2\', 31)),