如何重命名R中的lm的summary（）中的係數？

Question

我有很多互動術語，我想要將這些係數的名稱輸出到LaTeX，而不是那麼繁瑣。

我不想在我的數據框中預先生成所有的交互，這是一個很大的麻煩。

Answer 1

不知道你是否只是改變了名字，但如果是這樣的話，你就是這麼做的。

a <- runif(100,0,100) 
b <- 3*a+runif(100,0,50) 
c <- 4*a+runif(100,0,60) 
fit <- lm(a~b+c) 
names(fit$coefficients) <- c('bob','sally','sue') 
summary(fit) 
# Call: 
#lm(formula = a ~ b + c) 
# 
#Residuals: 
# Min  1Q Median  3Q  Max 
#-5.8876 -2.0380 0.0111 1.6112 6.4377 
# 
#Coefficients: 
#  Estimate Std. Error t value Pr(>|t|)  
#bob -8.72283 0.68552 -12.72 <2e-16 *** 
#sally 0.15337 0.01484 10.33 <2e-16 *** 
#sue 0.13740 0.01110 12.38 <2e-16 *** 
#--- 
#Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1 
# 
#Residual standard error: 2.945 on 97 degrees of freedom 
#Multiple R-squared: 0.9893, Adjusted R-squared: 0.9891 
#F-statistic: 4472 on 2 and 97 DF, p-value: < 2.2e-16