在R中讀取Spss數據文件

Question

我正在使用Expss pakage。 df<-read_spss("test.SAV")我顯示以下內容：

警告消息：在外部:: read.spss（enc2native（file），use.value.labels = FALSE，：Tally.SAV：找到了很長的字符串記錄（記錄類型7，子類型14），每個都將被導入在連續的單獨變量中

它在環境Panel中顯示4174個變量。數據文件中的實際變量數約為400。

Answer 1

如注釋foreign::read.spss將SPSS長（> 255個字符）字符變量拆分為幾列。 如果此類列為空，則可以將其刪除而不會出現任何問題。 便利功能：

remove_empty_characters_after_foreign = function(data){
    empty_chars = vapply(data, FUN = function(column) is.character(column) & all(is.na(column)), FUN.VALUE = logical(1))
    additional_chars = grepl("00\\d$", colnames(data), perl = TRUE)
    to_remove = empty_chars & additional_chars
    if(any(to_remove)){
        message(paste0("Removing ", paste(colnames(data)[to_remove], collapse = ", "),"..."))
    }
    data[,!to_remove, drop = FALSE]

}

df = remove_empty_characters_after_foreign(df)