未显示visNetwork边

Question

我正在尝试使用visNetwork绘制网络图。但是，没有显示边。在stackoverflow中也有一个非常类似的问题。但这里提到的解决方案并不适用于我的情况。任何帮助都是最好的。以下是需要绘制的节点和边数据集。

why doesn't this visNetwork in R show edge

nodes_CTP

   ID         label
1   0         order
2   1       details
3   2           tab
4   3      displays
5   4       profile
6   5        window
7   6        status
8   7          sign
9   8   powerorders
10  9        detail
11 10        button
12 11  prerequisite
13 12          icon
14 13 prerequisites
15 14         chart
16 15       control
17 16         entry
18 17     encounter
19 18        change
20 19        verify
21 20       purpose    

links_CTP

   from to value
1     0  1  0.55
2     0  2  0.53
3     0  3  0.50
4     0  4  0.50
5     0  5  0.49
6     0  6  0.48
7     0  7  0.44
8     0  8  0.43
9     0  9  0.42
10    0 10  0.41
11    0 11  0.39
12    0 12  0.39
13    0 13  0.38
14    0 14  0.38
15    0 15  0.38
16    0 16  0.37
17    0 17  0.37
18    0 18  0.37
19    0 19  0.37
20    0 20  0.37

library(visNetwork)

 visNetwork(nodes_CTP, links_CTP, height = "700px", width = "100%") %>%
  visOptions(selectedBy = "label", 
         highlightNearest = TRUE, 
         nodesIdSelection = TRUE) %>%
  visPhysics(stabilization = FALSE)

Answer 1

这对我来说很好。验证数据格式(类和名称)。

library(visNetwork)

nodes_CTP <- data.frame(id = 0:20, label = LETTERS[1:21])


links_CTP <- data.frame(from = 0, to = 1:20, 
                        value = seq(0.35, 0.5, length.out = 20))


visNetwork(nodes_CTP, links_CTP, height = "700px", width = "100%") %>%
  visOptions(selectedBy = "label", 
             highlightNearest = TRUE, 
             nodesIdSelection = TRUE) %>%
  visPhysics(stabilization = FALSE)