изменить цвет ссылок в сети D3 sankeyNetwork с помощью R - PullRequest
0 голосов
/ 02 мая 2020

Я создал sankeyNetwork, используя в . Как я могу изменить цвет потоковых линий или ссылок? Я хотел бы, чтобы линии потока были того же цвета, что и узлы.

Вот мой код:

library(networkD3)
library(xlsx)
links <- read.xlsx("C:/Users/Administrator/Desktop/Book1.xlsx", sheetName = "links")
nodes <- read.xlsx("C:/Users/Administrator/Desktop/Book1.xlsx", sheetName = "nodes")

sankeyNetwork(Links = links, Nodes = nodes, Source = "source", Target = "target", Value = "value", NodeID = "Diagnosis", fontSize = 11, nodeWidth = 15, fontFamily = "arial", iterations = 0)

1 Ответ

0 голосов
/ 04 мая 2020

Никто здесь не может воспроизвести ваш пример, потому что никто, кроме вас, не имеет доступа к файлу Book1.xlsx, который находится на вашем рабочем столе (подробнее здесь о , создающем хорошие воспроизводимые примеры ). Однако файл справки для sankeyNetwork() (вы можете получить к нему доступ, набрав ?sankeyNetwork в консоли R), документирует аргумент LinkGroup и дает пример его использования внизу.

LinkGroup - строка символов, указывающая группы в ссылках. Используется для раскраски ссылок в сети.

library(networkD3)

URL <- paste0('https://cdn.rawgit.com/christophergandrud/networkD3/',
              'master/JSONdata/energy.json')
energy <- jsonlite::fromJSON(URL)

energy$links$energy_type <- sub(' .*', '', energy$nodes[energy$links$source + 1, 'name'])


sankeyNetwork(Links = energy$links, Nodes = energy$nodes, Source = 'source',
              Target = 'target', Value = 'value', NodeID = 'name',
              LinkGroup = 'energy_type')

...