r - 检验回归系数是否显着小于 1（单尾 t 检验）

Question

我执行了一个简单的线性回归，并使用 summary() 得到了双尾 t 检验的结果，测试回归系数是否与 0 显着不同。

lmb <- lm(logspec ~ logfreq)

我想进行单尾 t 检验测试回归系数是否小于 1。

我在以前的线程中阅读了有关使用 offset() 将比较值设置为不同于 0 的信息，但我不确定它是否符合我希望看到的情况：

t <- lm(logspec ~ logfreq + offset(1*logfreq))

我认为执行单尾 t 检验的一种可能方法如下：

res <- summary(lmb)
d <- pt(coef(res)[, 3], lmb$df, lower.tail=FALSE)

其中上尾是感兴趣的，并且计算了 t 分布的分位数，但在这里我也不完全确定这是否与我想要实现的目标有关。

所以我找到了这两种方法，它们旨在将比较值设置为不同于 0 并执行单尾 t 检验，但我不确定它们是否是可行的方法以及我是否（以及如何）可以将两者结合起来？

标签： rt-test