make.keys 函数错误 `[<-`(`tmp`, abs(list.i), i, value = sign(list.i)) 中的错误：下标超出范围

【问题标题】：make.keys function error Error in `[<-`(`*tmp*`, abs(list.i), i, value = sign(list.i)) : subscript out of boundsmake.keys 函数错误 `[<-`(`*tmp*`, abs(list.i), i, value = sign(list.i)) 中的错误：下标超出范围
【发布时间】：2020-06-16 15:19:55
【问题描述】：

我正在尝试为我的量表评分，

key.list <- list(FinansalBilgi=c(25:34),
             Finansalihtiyat=c(37:40,42,43,44,45),
             borclanmaTutumu=c(35,36,41,46))
keys <- make.keys(23,key.list,item.labels = colnames(data)[24:46])

key.list 没问题，但是当我运行该函数时，它“Error in[(tmp, abs(list.i), i, value = sign(list.i)) : subscript out of bounds" error 我该怎么办？请帮忙

【问题讨论】：

标签： r itemsource

【解决方案1】：

有两个问题。首先，让我输入 psych::make.keys 函数的封闭形式：

函数（nvars、keys.list、item.labels = NULL、key.labels = NULL）

1- 列表中的 nvar 值应为 22。或者您可以考虑在 key.list 中再添加 1 项，使其成为 23 项。

2- 检查函数体后，我发现您需要从 1 开始对 key.list 中的项目进行编号。下面的脚本可以正常工作。

key.list <- list(FinansalBilgi=c(1:10),
                 Finansalihtiyat=c(13:16,18:21),
                 borclanmaTutumu=c(11:12,17,22))

keys <- make.keys(22,key.list)

或

keys <- make.keys(22,key.list, item.labels = colnames(data)[25:46])

我希望这会有所帮助。

【讨论】：