在线性模型中记录变换并将输出导出到办公室

Question

我有以下代码进行线性回归：

data<-read.csv("File.csv",header=T)
trans<-log(data)
attach(trans)
outdata<-summary(lm(Y~A + B + C))

在输出中，我基本上是log(y)=b0+b1*log(A)+b2*log(B)+b3*log(C)。在摘要输出中，R给出了log（A），log（B）和log（C）的系数。但是，我想要A，B和C的系数。有没有办法让R给出输出为10 ^（b0），10 ^（b1）和10 ^（b2）？

Answer 1

这里有几件事：

• 默认情况下，R中的log函数使用基数e，因此确实不希望在使用base {转换数据后使用基数10对系数取幂{1}}。
• 系数可通过e或较少推荐的coef()访问。您可以直接提取它们，然后根据需要进行转换。
• 不要转换outdata$coefficients[,1]中的所有内容然后将其打印出来。大多数其他信息最终都是荒谬的。