GBM泊松回归置信区间

Question

如果我有一个gbm泊松回归模型，如下所示：

# My data
set.seed(0)
df <- data.frame(count = rpois(100,1),
                 pred1 = rnorm(100, 10, 1), 
                 pred2 = rnorm(100, 0, 1), 
                 pred3 = rnorm(100, 0, 1))

# My Split
split <- initial_split(df)

# My model
library(gbm)
m <- gbm(
  formula = count ~ .,
  distribution ="poisson",
  data = training(split))

我做了一个预测：

# My prediction
p <- predict(m, 
             n.trees=m$n.trees, 
             testing(split), 
             type="response")

我想围绕p的值生成一些置信区间。当我使用m对测试数据集或新数据集（预测变量具有相同的基础分布）进行预测时，我似乎找不到做到这一点的方法。