r语言 - 'rms::ols()':如何在没有截距的情况下拟合模型

Question

我想使用 rms 包中的 ols()（普通最小二乘）函数进行多元线性回归，但我不希望它计算截距。使用lm()语法如下所示：

model <- lm(formula = z ~ 0 + x + y, data = myData)

其中0阻止它计算截距，并且只返回两个系数，一个用于x，另一个用于y。使用ols()时如何执行此操作？正在尝试

model <- ols(formula = z ~ 0 + x + y, data = myData)

没有工作，它仍然返回一个截距和一个系数，分别返回x和y.

这是指向 csv 文件的链接

它有五列。对于此示例，只能使用前三列：

model <- ols(formula = CorrEn ~ intEn_anti_ncp + intEn_par_ncp, data = ccd)

谢谢！

Answer 1

rms::ols使用rms:::Design而不是model.frame.default。 Design 以默认值 intercept = 1 调用，因此没有（明显的）方法来指定没有截距。我认为这是有充分理由的，但是您可以尝试使用trace更改ols。