Агрегированные имена столбцов ddply

Я использую ddply для агрегирования моих данных, но не нашел элегантного способа присвоить имена столбцов выходным данным фрейм данных.

В данный момент я делаю это:

agg_data <- ddply(raw_data, .(id, date, classification), nrow)
names(agg_data)[4] <- "no_entries"

и это

agg_data <- ddply(agg_data, .(classification, date), colwise(mean, .(no_entries)) )
names(agg_data)[3] <- "avg_no_entries"

Есть ли лучший и более элегантный способ сделать это?