如何在texreg中显示t值

如何在texreg中显示t值,r,regression,texreg,R,Regression,Texreg,我是R的初学者,我有一个关于texreg的问题 我在网上搜索信息已经好几天了,但没找到多少。我希望使用texreg将t值包括在导出表中,并且我希望t值正好位于[]中每个系数的下方 如果有人能给我一些提示,我将不胜感激,谢谢 通常,标准误差应在括号中报告。但是,如果您真的想用t值替换它们,可以按如下操作 来自lm文档的回归分析示例: ctl <- c(4.17,5.58,5.18,6.11,4.50,4.61,5.17,4.53,5.33,5.14) trt <- c(4.81,4.1

我是R的初学者,我有一个关于texreg的问题

我在网上搜索信息已经好几天了,但没找到多少。我希望使用texreg将t值包括在导出表中,并且我希望t值正好位于[]中每个系数的下方


如果有人能给我一些提示,我将不胜感激,谢谢

通常,标准误差应在括号中报告。但是,如果您真的想用t值替换它们,可以按如下操作

来自
lm
文档的回归分析示例

ctl <- c(4.17,5.58,5.18,6.11,4.50,4.61,5.17,4.53,5.33,5.14)
trt <- c(4.81,4.17,4.41,3.59,5.87,3.83,6.03,4.89,4.32,4.69)
group <- gl(2, 10, 20, labels = c("Ctl","Trt"))
weight <- c(ctl, trt)
lm.D9 <- lm(weight ~ group)
lm.D90 <- lm(weight ~ group - 1)
这将覆盖标准错误,并用您提供的自定义值替换它们。结果表:

=================================
             Model 1    Model 2  
---------------------------------
(Intercept)   5.03 ***           
             (0.50)              
groupTrt     -0.37       4.66 ***
             (0.50)     (0.50)   
groupCtl                 5.03 ***
                        (0.50)   
---------------------------------
R^2           0.07       0.98    
Adj. R^2      0.02       0.98    
Num. obs.    20         20       
=================================
*** p < 0.001, ** p < 0.01, * p < 0.05
=================================
模型1模型2
---------------------------------
(截取)5.03**
(0.50)              
组TRT-0.37 4.66***
(0.50)     (0.50)   
集团CTL 5.03***
(0.50)   
---------------------------------
R^20.07 0.98
形容词。R^20.02 0.98
编号:obs。20         20       
=================================
***p<0.001,**p<0.01,*p<0.05
解决方案2:

screenreg(list(lm.D9, lm.D90), override.se = 
    list(c(0.5, 0.5), c(0.5, 0.5)))
您可以提取系数等并将其保存到对象,操纵对象,然后将操纵对象移交给texreg,而不是将模型移交给texreg

tr1 <- extract(lm.D9)
tr1@se <- c(0.5, 0.5)  # enter new values, e.g., t values
tr2 <- extract(lm.D90)
tr2@se <- c(0.5, 0.5)  # enter new values, e.g., t values
screenreg(list(tr1, tr2))

tr1什么是
texreg
?请说明这是从哪个包裹寄来的。还请发布一些示例数据和代码。由于您尚未提供测试用例,您应该在文件包作者编写的文件第18-21页上进行独立研究:社会学家通常在论文中提供t值。