Существует пакет R, называемый dplyr, который делает этот тип агрегации очень простым. В вашем случае вы можете суммировать данные, используя несколько строк кода.
library(dplyr)
results <- df %>%
group_by(ID, Date) %>%
summarise(numPurchases = n(),
totalPurchases = sum(Quantity))
df будет вашими входными данными. В ваших результатах будут столбцы «Идентификатор» и «Дата», а также новый столбец, в котором будет показано количество продаж по идентификатору за дату (numPurchases), а также новый столбец, в котором показано общее количество покупок по идентификатору за дату (totalPurchases). Надеюсь, это поможет.