问R语言 分组计算出来的结果每组数值相同是为什么？

各位大佬前辈们好，

在进行分组计算不同DRG组内Q1，Q3以及IQR时，得到的每组数值却是相同的。用aggregate 单独计算IQR就是正确的，每组数值不同. code如下:

install.packages("dplyr")

library(dplyr)

datacut<-datacalcul %>% group_by(DRG_CODE) %>% summarise(Q1=quantile(datacalcul$TOTAL_AMOUNT,0.25),Q3=quantile(datacalcul$TOTAL_AMOUNT,0.75),IQRamonut = IQR(datacalcul$TOTAL_AMOUNT))

非常感谢