Question

我正在尝试使用Stargazer包来导出＆＃34;导出＆＃34;我的估计结果是LaTeX代码。我已经阅读了观星者手册，甚至试图导出选定的行而没有任何运气。要处理的包有很多输出。

我创建了一个对象

Summary <- summary(VAR(Vektorer, p=1, type="const", ic = c("AIC", "HQ", "SC", "FPE")))

然后，我使用stargazer包

stargazer(Summary)

并收到以下错误：

错误：无法识别的对象类型。

是否有任何熟悉此对象类型以及如何将其导出为LaTeX代码的人？我想还有其他更适合对象类型的包。不幸的是，我不太熟悉将R输出导出到LaTeX。

Answer 1

首先，我假设您正在使用'vars'中的VAR函数。如果是这样，您真的想从摘要函数中一次提取所有信息吗？相反，您可以选择Summary$varresult$´variable´提供哪些信息。

我使用xtable来生成LaTeX代码

，而不是使用stargazer

library(vars)
library(xtable)

X <- cbind("A"=rnorm(100, 50), "B"=rnorm(100, 600, 50))

model <- VAR(X, p=1, type = "const", ic = c("AIC", "HQ", "SC", "FPE"))
tmp <- summary(model)

xtable(tmp$varresult$A)
xtable(tmp$varresult$B)

另请注意tmp$的所有其他可能输出。

Answer 2

错误消息中的问题很明显;观星者不理解你传递它的物体的类型。

一个选项是传递底层的lm对象，这个stargazer确实知道如何处理。有点像：

list_to_format = [u'Massimo Eraldo Abate', u'Valentina Abate', u'Carlo Abbate']

new_list = []

for value in list_to_format:
    new_list.append((value.encode('utf8').decode('utf-8')))

print(new_list)

Answer 3

您必须在var模型输出列表中检索正确的信息。例如，

library(stargazer)

x1 <- 5 + 1.1*rnorm(100, 4, 2) + rnorm(100, 0, 2)
x2 <- runif(100, -1, 1)
y1 <-  x1/2 + rnorm(100, 0, 1)
y2 <- 10*sqrt(abs(x2)) - rpois(100, 3)

ts <- cbind(x1 , x2, y1, y2)

var_model <- VAR(ts[,c('y1','y2')],
                       lag.max = 1, ic = "AIC",
                       exogen = ts[,c('x1','x2')])

现在，您只需要输入观星者可以理解的信息：

stargazer(var_model[["varresult"]], type = 'text')

由观星者

3 个答案: