Ошибка функции make.keys Ошибка в `[<-` (` * tmp * `, abs (list.i), i, value = sign (list.i)): нижний индекс за пределами

Question

Я пытаюсь оценить свою шкалу,

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 [<- <code>( tmp , abs(list.i), i, value = sign(list.i)) : subscript out of bounds" error что делать? Помогите пожалуйста

Answer 1

Есть две проблемы. Прежде всего, позвольте мне ввести закрытую форму функции mental :: make.keys:

function (nvars, keys.list, item.labels = NULL, key.labels = NULL)

1 - В вашем списке значение nvars должно быть 22. Или вы можете добавить еще 1 элемент в key.list, чтобы сделать его 23 элемента.

2- После проверки тела функции я увидел, что вам нужно начать нумерацию элементов в вашем key.list с 1. Ниже скрипт работает нормально.

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])

Надеюсь, это поможет.