我想导出一个我正在处理的数据集,R
供我的同事在SPSS
. 当我导出数据集时,我想包含变量标签(即下面的列),我不是在询问描述变量级别的值标签:
是否有haven
允许我设置此变量标签的选项?
我搜索了文档,发现只有设置值标签的功能。我注意到这是一个似乎支持变量标签haven
的包装器。ReadStat
在ReadStat
文档Citizenship of respondent
中,可以在下面的块中看到变量标签 ( ):
{
"type": "SPSS",
"variables": [
{
"type": "NUMERIC",
"name": "citizenship",
"label": "Citizenship of respondent",
"categories": [
{
"code": 1,
"label": "Afghanistan"
},
...
不幸的是,我对的理解C++
不够复杂,无法理解幕后haven
的工作原理,因此非常欢迎提出任何建议。
我找到了一种解决方法,它涉及通过使用属性手动设置变量标签。考虑下面的示例,使用来自UK Data Service的教学数据集:
# install.packages("tidyverse")
library("tidyverse")
tmp = tempfile(fileext = ".zip")
tmpdir = tempdir()
download.file(
"http://ws.ukdataservice.ac.uk/REST/Download/Download/DSO/7912spss_e5b795672124e5b409e4a53c1a06fb9e.zip",
destfile = tmp
)
unzip(tmp, exdir = tmpdir)
tmpdir = paste0(tmpdir, "/UKDA-7912-spss/spss/spss19/")
file = paste0(tmpdir, list.files(tmpdir))
dat = haven::read_sav(file)
str(dat)
# Classes ‘tbl_df’, ‘tbl’ and 'data.frame': 22428 obs. of 14 variables:
# $ CASENEW : atomic 1 2 3 5 5 6 6 7 8 9 ...
# ..- attr(*, "label")= chr "New random ID number"
# ..- attr(*, "format.spss")= chr "F8.2"
# ..- attr(*, "display_width")= int 10
# ...
因此,我可以使用以下方法更改变量标签:
attr(dat$CASENEW, "label") = "Foo"
attr(dat$CASENEW, "label")
# "Foo"
其中,当我写入一个新.sav
文件时,它确实按SPSS
. 我的问题是,是否有本地方法可以做到这一点haven
?