問卷/變量之間的相關性

Question

我正在使用不同的問卷。 例如，我有一組參與者只需要填寫3個調查表，其他人則需要填寫4個，其他6個，以及其他7個。我想評估他們的生活質量，但是有些參與者填寫了所有調查表在同一天（我意識到這在我的分析中引入了很大的偏見）。 現在，我想檢查是否在同一天填寫的問卷對於每個問卷也都以相同的方式填寫。 這是一個例子：

id QA1 QA2 QA3 QA4 QA5 QA6 QB1 QB2 QB3 QB4 QB5 QB6
1   1   3    2   2  3   3   1   3    2   2  3   3
2   2   NA    2   2  2  1   1   3    2   1  2   3 
3   3   2    3   1  1   1   2   1    1   NA 3  NA 
4   2   1    NA  3  2   NA  1   3    3   1  2   1 
5   1   1    3   2  1   3   1   1    3   2  1   3

在示例中，id 1和5以相同的方式填寫了兩個調查表。 如何檢查我的完整數據框？

問候

Answer 1

我認為這可以解決您的問題。 它檢查每一行並比較響應值：

QAs <- grep('QA', colnames(df)) #which cols contain QA survey questions
QBs <- grep('QB', colnames(df)) #which cols contain QB survey questions
#check if all non-NA values are the same and all NAs are in same location. 
check <- function(x){
    return( all(all(x[QAs] == x[QBs], na.rm=T), all(is.na(x[QAs]) == is.na(x[QBs])) ) ) 
}
apply(df, 1, check)

[1]  TRUE FALSE FALSE FALSE  TRUE