我想获得一个类lm的对象，它对应于预定义模型公式系数的线性回归模型。
换句话说，我希望能够做到这样的事情：
# Define formula
frormula.predefined <- as.formula.predefined("res ~ 1.8765*var_1 + 4.4875*var_2")
# Get model object
lm.model <- lm.from.frormula.predefined(frormula.predefined)
目标是使用它来预测未来的值（我可以根据我提出的系数进行乘法，但我更愿意与lm类使用思想保持一致。）