如何确定哪个元素不遵循r中的泊松分布？

Question

我有一个数据集，该数据集记录了这些物品以及该特定物品被触摸了多少次。由于每个项目都是独立的，并且拣选是随机的，因此可以确定它遵循泊松分布。

DT <- data.frame(X = c(paste0("A", 1:78)), 
                 Y = c(rep(6, 13), rep(7, 17 ), rep(8, 9), rep(9, 8), 
                       rep(10, 8), rep(12,2), rep(14,2), rep(17, 18), 23))  

根据历史记录，显然似乎并不总是遵循预期的泊松形状。

hist(DT$Y)
hist(dpois(DT$Y, lambda = mean(DT$Y)))

我的问题是，必须有一些项目，例如最右边的两个项目被“ unPoissonly”所感动。如何确定每个项目都是“异常”？