我有一个试图解码调查数据的抄本。不幸的是,在该调查数据中,有时存在空白值和NA,这些空白值和NA在抄本中未表示。我尝试解决此问题的第一个想法是追加编解码器,以便每个问题列表都具有空格和NA的占位符,以便在解码时仍可以传递这些值。我想创建一个类似
的函数blanks<-function(df,question){
df[[question]][[" "]]<-"blank"
}
这样一来,我可以对法典中的每个列表执行lapply并添加名为“”的值“ blank”。所以不是它
codex$question1
$'0'
[1] "No"
$'1'
[1] "Yes"
我们可以看一下
codex$question1
$'0'
[1] "No"
$'1'
[1] "Yes"
$' '
[1] " "
然后,我将对NA和其他任何我遇到的问题执行相同的过程。显然这是行不通的,所以我希望有一种方法可以使它工作。这可能不是解决问题的最佳方法,因此,如果有更好的方法可以解决此问题,我也将接受答案。
答案 0 :(得分:0)
我们可以使用append
在列表中添加一个元素:
list1 <- list(`0` = "No", `1` = "Yes")
append(list1, list(` ` = " "))
输出:
$`0`
[1] "No"
$`1`
[1] "Yes"
$` `
[1] " "
我建议不要将您的列表元素命名为空白。将其命名为blank
或遵循标准命名约定的名称。