Purtest對象-如何將Output保存為tex文件？

Question

我想知道是否存在保存最purtest -輸出為LaTeX文件？

正如您在示例代碼中看到的那樣，我已經嘗試通過stargazer生成它。 但是， stargazer函數不支持purtest-class 。

library(plm)
library(stargazer)

dat <- data.frame(entity = c(rep("a",10),rep("b",10)),year = 
rep(1970:1979,2),value = rnorm(20))
pdat <- pdata.frame(dat,index = c("entity","year"))

res <- purtest(object = pdat$value,test = "ips",exo = "intercept",pmax = 1)

stargazer(summary(res),type = "latex")

我知道可以手動提取值，將它們存儲在data.frame中，並最終通過print.xtable將data.frame保存為LaTeX文件。 但是，也許有任何巧妙的方法可以解決該問題。

Answer 1

Stargazer庫有很多檢查約束了可以使用的類。 不包括“最高級”類，但是由於Stargazer支持導出“矩陣”類，因此可以克服這些限制。 例如：

    # the problem
    library(plm)
    library(stargazer)

    dat <- data.frame(entity = c(rep("a",10),rep("b",10)),year = 
                        rep(1970:1979,2),value = rnorm(20))
    pdat <- pdata.frame(dat,index = c("entity","year"))

    res <- purtest(object = pdat$value,test = "ips",exo = "intercept",pmax = 1)


    # One solution: extract the parametars and place them in the matrix:
    a = unlist(res$idres[[1]])
    b = unlist(res$idres[[2]])
    all =  rbind(a, b)
    class(all) <- c("matrix")

    stargazer(all,type = "latex",align = T) 
    # need to align , else you get strange double dollar signs