假设我使用mtcars数据集来设置任意公式:
数据(mtcars)
myFormula< - as.formula(“mpg~cyl + I(disp / hp)+ I(wt ^ 2)+ I((qsec + vs)/ gear)”)我想用那个公式……
您可以从正在回归的数据中删除这些值。 Inf将出现在hp == 0或gear == 0的地方。
data(mtcars) df <- mtcars myFormula <- as.formula("mpg ~ cyl + I(disp / hp) + I(wt^2) + I((qsec + vs) / gear)") df <- df[!(df$hp==0 | df$gear==0),] lm(myFormula,df) > lm(myFormula,df) Call: lm(formula = myFormula, data = df) Coefficients: (Intercept) cyl I(disp/hp) I(wt^2) I((qsec + vs)/gear) 35.5847 -1.9639 1.0707 -0.3671 -0.1699