对systemfit对象使用stargazer

对systemfit对象使用stargazer,r,latex,knitr,stargazer,systemfit,R,Latex,Knitr,Stargazer,Systemfit,我想知道如何将stargazer用于systemfit对象。下面是我的工作示例,它给出了两个不同的表,而不是一个 library("systemfit") data("Kmenta") eqDemand <- consump ~ price + income eqSupply <- consump ~ price + farmPrice + trend eqSystem <- list(demand = eqDemand, supply = eqSupply) fitols

我想知道如何将stargazer用于systemfit对象。下面是我的工作示例,它给出了两个不同的表,而不是一个

library("systemfit")
data("Kmenta")
eqDemand <- consump ~ price + income
eqSupply <- consump ~ price + farmPrice + trend
eqSystem <- list(demand = eqDemand, supply = eqSupply)
fitols   <- systemfit(eqSystem, data=Kmenta)
fitsur <- systemfit(eqSystem, method = "SUR", data=Kmenta)

library(stargazer)

stargazer(
      coef(fitols)
    , coef(fitsur)
    , title="Regression Results"
    , align=TRUE
  )
库(“systemfit”)
数据(“Kmenta”)

eqDemand还不受支持,但计划在将来发布。如果您对最终表格的外观(和/或systemfit回归表格输出中的重要内容)有任何建议,请发送电子邮件至
stargazer
的作者。

可以使用
texreg
软件包中的
texreg
功能完成:

texreg(list(fitols, fitsur))

\begin{table}
\begin{center}
\begin{tabular}{l c c c c }
\hline
            & Model 1 & Model 2 & NA & NA \\
\hline
(Intercept) & $99.90^{***}$ & $58.28^{***}$ & $99.33^{***}$ & $61.97^{***}$ \\
            & $(7.52)$      & $(11.46)$     & $(7.51)$      & $(11.08)$     \\
price       & $-0.32^{**}$  & $0.16$        & $-0.28^{**}$  & $0.15$        \\
            & $(0.09)$      & $(0.09)$      & $(0.09)$      & $(0.09)$      \\
income      & $0.33^{***}$  &               & $0.30^{***}$  &               \\
            & $(0.05)$      &               & $(0.04)$      &               \\
farmPrice   &               & $0.25^{***}$  &               & $0.21^{***}$  \\
            &               & $(0.05)$      &               & $(0.04)$      \\
trend       &               & $0.25^{*}$    &               & $0.34^{***}$  \\
            &               & $(0.10)$      &               & $(0.07)$      \\
\hline
R$^2$       & 0.76          & 0.65          & 0.76          & 0.61          \\
Adj. R$^2$  & 0.74          & 0.59          & 0.73          & 0.54          \\
Num. obs.   & 40            & 40            & 40            & 40            \\
\hline
\multicolumn{5}{l}{\scriptsize{$^{***}p<0.001$, $^{**}p<0.01$, $^*p<0.05$}}
\end{tabular}
\caption{Statistical models}
\label{table:coefficients}
\end{center}
\end{table}
texreg(列表(fitols,fitsur))
\开始{table}
\开始{center}
\开始{表格}{lc}
\赫林
&模型1和模型2以及NA和NA\\
\赫林
(截距)和$99.90^{***}$和$58.28^{***}$和$99.33^{***}$和$61.97^{***}$\\
& $(7.52)$      & $(11.46)$     & $(7.51)$      & $(11.08)$     \\
价格&$-0.32^{**}$&0.16$&0.28^{**}$&0.15美元\\
& $(0.09)$      & $(0.09)$      & $(0.09)$      & $(0.09)$      \\
收入&$0.33^{***}$&&$0.30^{***}$&\\
& $(0.05)$      &               & $(0.04)$      &               \\
农场价格&&$0.25^{***}$&&$0.21^{***}$\\
&               & $(0.05)$      &               & $(0.04)$      \\
趋势&&$0.25^{*}$&&$0.34^{***}$\\
&               & $(0.10)$      &               & $(0.07)$      \\
\赫林
R$^2$&0.76&0.65&0.76&0.61\\
形容词。R$^2$&0.74&0.59&0.73&0.54\\
obs&40            & 40            & 40            & 40            \\
\赫林
\多列{5}{l}{\scriptsize{$^{***}p