Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/68.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
使用read_sav读取spss文件后删除额外信息(attr)_R_Tidyverse_R Haven - Fatal编程技术网

使用read_sav读取spss文件后删除额外信息(attr)

使用read_sav读取spss文件后删除额外信息(attr),r,tidyverse,r-haven,R,Tidyverse,R Haven,我使用read_sav()读取R中的SPSS文件 如何删除额外信息(attr) 我不知道如何为这个问题创建reprex,但我有下面的示例。我希望从PersonID列中删除attr,并将其转换为普通的dataframe/tibble 谢谢 要删除列的所有属性,可以使用: attributes(data$PersonID) <- NULL 要删除列的所有属性,可以使用: attributes(data$PersonID) <- NULL 如果您只需要对单个数值变量执行此操作,那么as

我使用read_sav()读取R中的SPSS文件

如何删除额外信息(attr)

我不知道如何为这个问题创建reprex,但我有下面的示例。我希望从PersonID列中删除attr,并将其转换为普通的dataframe/tibble 谢谢


要删除列的所有属性,可以使用:

attributes(data$PersonID) <- NULL

要删除列的所有属性,可以使用:

attributes(data$PersonID) <- NULL

如果您只需要对单个数值变量执行此操作,那么
as.numeric(PersonID)
应该可以工作-但是如果您需要其他变量或整个数据集的更全面的解决方案,您可能希望在此处查看解决方案:和。因为您使用的是haven,所以您还可以查看haven()中的
zap_()
函数族。在这种情况下,您可以使用
zap_格式(数据)
zap_标签(数据)
,如果您只需要对单个数值变量执行此操作,则
as.numeric(PersonID)
应该有效-但是,如果您需要针对其他变量或整个数据集的更全面的解决方案,您可能希望在此处查看解决方案:和。因为您使用的是haven,所以您还可以查看haven()中的
zap_()
函数系列。在本例中,您将使用
zap_格式(数据)
zap_标签(数据)
谢谢。在haven文档中,有以zap_xxxx()开头的函数。你能告诉我这些是不是可以用的染料,它们也可以用,看起来更适合这个任务
zap_标签
从数据中删除标签,而
zap_格式
删除格式。我们必须一起使用它们来删除这两个属性。更新了答案,包括这一点。非常感谢。在haven文档中,有以zap_xxxx()开头的函数。你能告诉我这些是不是可以用的染料,它们也可以用,看起来更适合这个任务
zap\u labels
从数据中删除标签,而
zap\u格式
删除格式。我们必须一起使用它们来删除这两个属性。更新了答案,包括这一点。非常感谢
attr(data$PersonID, 'format.spss') <- NULL
data[] <- lapply(data, function(x) {attributes(x) <- NULL;x})
library(haven)
data <- zap_formats(zap_labels(data))