如何在 R 中最舒适地加载 .dta（保留标签）？

Question

我使用 .dta 文件并尝试使加载数据尽可能舒适。在我看来，我需要 haven 和 readstata13 的组合。

haven 看起来很完美。它提供最好的 "sub-labels"。但它不提供列选择器功能。我不能将 read_dta 用于大文件（~ 1 GB / 在 64 GB RAM，Intel Xeon E5 上）。问题：有没有办法select/load数据子集？
read.dta13 是我最好的解决方法。它有 select.cols。但我必须稍后得到 attr，保存并合并它们（大约 10 个文件）。

问题：如何手动添加haven包创建的这些第二个标签？（怎么称呼？）

这是 MWE：

library(foreign)
write.dta(mtcars, "mtcars.dta")

library(haven)
mtcars <- read_dta("mtcars.dta")

library(readstata13)
mtcars2 <- read.dta13("mtcars.dta", convert.factors = FALSE, select.cols=(c("mpg", "cyl", "vs")))
var.labels <- attr(mtcars2,"var.labels")
data.key.mtcars2 <- data.frame(var.name=names(mtcars2),var.labels)

Answer 1

haven 的 development version 支持使用 col_select 参数选择列：

library(haven) # devtools::install_github("tidyverse/haven")
mtcars <- read_dta("mtcars.dta", col_select = c(mpg, cyl, vs))

或者； RStudio 查看器中的列标签取自数据框列的 "label" 属性。您可以使用一个简单的循环从 readstata13:

读取的标签中分配它们

for (i in seq_along(mtcars2)) {
  attr(mtcars2[[i]], "label") <- var.labels[i]
}

View(mtcars2)

如何在 R 中最舒适地加载 .dta（保留标签）？

How to load .dta (preserving labels) most comfortable in R?

r

read-data

r-haven