Функции не отображаются на сетевом графике в R с использованием igraph

Я сделал сетевой график из 44 объектов, но имена этих объектов не отображаются на моем сетевом графике. Когда я запускаю свой код, эта ошибка показывает:

Error in symbols(x = coords[, 1], y = coords[, 2], bg = vertex.color,  :

неверный параметр символа

Я пробовал это: Невозможно построить сеть на igraph, но ничего не получилось.

Кто-нибудь знает, что мне следует изменить? Вот мой код:

co <- filter(data) %>%
select(-q, -ID) %>%
  cor()

library(igraph)
g <- graph.adjacency(co,
                            weighted = TRUE,
                            diag = FALSE,
                            mode = "upper")

cut.off_b <- mean(E(g)$weight)

g_2 <- delete_edges(g, E(g)[weight < cut.off_b])

c_g_2 <- cluster_fast_greedy(g_2) 

plot(c_g_2, g_2,
     vertex.size = colSums(co) * 10,
     vertex.frame.color = NA, 
     vertex.label.color = "black", 
     vertex.label.cex = 0.8,
     edge.width = E(g_2)$weight * 15,
     layout = layout_with_fr(g_2),
     main = "Network")

dput (co):

 structure(c(1, .07977915371083, 0.152143694525588, -0.0218189826329971, 0.0485372722131193, 0.000923129223941082, -0.0222534655849573, 516, 1, -0.205361264538372, -0.149616273645181, 0.241437784766734, -0.140457111733162, 0.52697977722007, 0.588437224079489, -0.00263277091969263, 0.22151603150994, 0.245933601749799, 0.0485372722131193, -0.205361264538372, 1, 0.409240797220096, -0.444516191462303, -0.0553258405959017, 0.224169841776048, 0.286458842414816, -0.00708372057991018, 0.175543278780438, 0.190122437013223, 0.000923129223941082, -0.149616273645181, 0.409240797220096, 1

А это мой сюжет:

Функции не отображаются на сетевом графике в R с использованием igraph

Пожалуйста, dput(data) или dput(co), чтобы поделиться своими данными

— 05.04.2021 17:33

Вы должны поделиться переменными co

— 05.04.2021 17:48

Я имел в виду dput (co)

— 05.04.2021 18:03

Вы имеете в виду следующее: .Dimnames = list (c («A», «B», «C», «F», «G», «H», «K», «L», «N», «P» , «S»), c («A», «B», «C», «F», «G», «H», «K», «L», «N», «P», «S ") @ThomasIsCoding

— 05.04.2021 19:04

Неа. Вы можете ввести dput (co) в консоли и скопировать вывод в свой пост. Вы должны поделиться ценностями в co

— 05.04.2021 19:20

Не могли бы вы выложить это в свой пост?

— 05.04.2021 19:59

см. обновление @ThomasIsCoding

— 05.04.2021 20:07

r networking plot igraph

05.04.2021 17:02

Стоит ли изучать PHP в 2026-2027 годах?

Привет всем, сегодня я хочу высказать свои соображения по поводу вопроса, который я уже много раз получал в своем сообществе: "Стоит ли изучать PHP в...

Поведение ключевого слова "this" в стрелочной функции в сравнении с нормальной функцией

В JavaScript одним из самых запутанных понятий является поведение ключевого слова "this" в стрелочной и обычной функциях.

Приемы CSS-макетирования - floats и Flexbox

Здравствуйте, друзья-студенты! Готовы совершенствовать свои навыки веб-дизайна? Сегодня в нашем путешествии мы рассмотрим приемы CSS-верстки - в...

Тестирование функциональных ngrx-эффектов в Angular 16 с помощью Jest

В системе управления состояниями ngrx, совместимой с Angular 16, появились функциональные эффекты. Это здорово и делает код определенно легче для...

Концепция локализации и ее применение в приложениях React ⚡️

Локализация - это процесс адаптации приложения к различным языкам и культурным требованиям. Это позволяет пользователям получить опыт, соответствующий...

Пользовательский скаляр GraphQL

Листовые узлы системы типов GraphQL называются скалярами. Достигнув скалярного типа, невозможно спуститься дальше по иерархии типов. Скалярный тип...

Перейти к ответу Данный вопрос помечен как решенный

Ответы 1

Ответ принят как подходящий

Думаю, вы можете попробовать abs(colSums(co)*10) вместо vertex.size в plot, так как он всегда должен иметь положительное значение. Пример приведен ниже

plot(
  c_g_2, g_2,
  vertex.size = abs(colSums(co) * 10),
  vertex.frame.color = NA,
  vertex.label.color = "black",
  vertex.label.cex = 0.8,
  edge.width = E(g_2)$weight,
  layout = layout_with_fr(g_2),
  main = "Network"
)

который дает