Naming the groups for which the rows are aggregated

Question

I have data as follows:

DT <- structure(list(Area = c("A", "A", "A", "A", "B", "B", "B&quo