Жаккард Анализ сходства - PullRequest
Новая
       37

Жаккард Анализ сходства

0 голосов
/ 17 апреля 2020

Я пытаюсь выполнить анализ Жакара из R.

Но после обработки мои столбцы результатов равны NULL.

Я пытался найти решение многими способами , но проблема все еще остается.

Может кто-нибудь помочь мне, пожалуйста? 

#######################PROCESSING JACCARD ANAYLSIS###################
Jaccard = function (x, y) {
M.11 = sum(x == 1 & y == 1)
M.10 = sum(x == 1 & y == 0)
M.01 = sum(x == 0 & y == 1)
return (M.11 / (M.11 + M.10 + M.01))
}

input.variables = data.frame(Q6_01, Q6_02, Q6_03, Q6_04, Q6_05, Q6_06, Q6_07, Q6_08)


m = matrix(data = NA, nrow = length(input.variables), ncol = length(input.variables))
for (r in 1:length(input.variables)) {
  for (c in 1:length(input.variables)) {
    if (c == r) {
      m[r,c] = 1
    } else if (c > r) {
      m[r,c] = Jaccard(input.variables[,r], input.variables[,c])
    }
  }
}

variable.names = sapply(input.variables, attr, "label")
colnames(m) = variable.names
rownames(m) = variable.names   

jaccards = m

enter image description here

1 Ответ

0 голосов
/ 17 апреля 2020

Если вы пытаетесь вычислить сходство с Жакаром, я бы посоветовал проверить пакет . Функция vegdist() может использоваться для расчета множества различных показателей сходства / различий. Проверьте ?vegdist.

Для Jaccard вы бы использовали vegdist(your_dataframe_name, method = "jaccard")

...