у выделить весь путь, когда я нажимаю на узел, чтобы узнать всю историю конкретного узла, и вот пример:http://bl.ocks.org/git-ashish/8959771 .

Пожалуйста, проверьте эту ссылку, и вы найдете функцию, которая выделяет путь в javscript, но будьте осторожны, эта функция не делает то, что я хочу, она выделяет ссылки, связанные с выбранным узлом, и ссылки, связанные с целевыми узлами. я хочу выделить все ссылки, связанные с выбранным узлом.

d3 Sankey - выделите все подключенные пути от начала до конца

Вот пример того, что мне нужно,Это весь график, который мне нужен, когда я нажимаю на Бангкок, он выделяет все узлы, которые находятся в одном и том же сырце с Бангкоком в кадре данных, например, выделяет ссылку на ClimateChange и EnergyShortage, .... затем выделяется инфраструктура и экосистемы, и лидерство и стратегия, и .... это то, что я хочу. Вот еще одна картина, на которой показаны узлы, которые связаны с Бангкоком и используют его для анализа.

Вот что происходит, когда я использую highlight_node_links, который в bl.ocks и связанном вопросе, и это неправильно, и не показывает отношения между узлами и Bangkoks.

Вот данные для Бангкока, чтобы показать вам, как столбцы связаны друг с другом, и когда вы используете эти данные, он будет генерировать только второе изображение.

structure(list(City = c("Bangkok", "Bangkok", "Bangkok", "Bangkok", 
"Bangkok", "Bangkok", "Bangkok", "Bangkok", "Bangkok", "Bangkok", 
"Bangkok", "Bangkok", "Bangkok", "Bangkok", "Bangkok", "Bangkok"
), ResiliencyChallenge = c("ClimateChange", "ClimateChange", 
"ClimateChange", "ClimateChange", "ClimateChange", "InfrastructureFaliure", 
"EnergyShortage", "Pollution", "Pollution", "Pollution", "TransportationSystemFailure", 
"TransportationSystemFailure", "TransportationSystemFailure", 
"TransportationSystemFailure", "TransportationSystemFailure", 
"TransportationSystemFailure"), CRI.Dimesnsion.1 = c("Infrastructure & Ecosystems", 
"Infrastructure & Ecosystems", "Infrastructure & Ecosystems", 
"Infrastructure & Ecosystems", "Infrastructure & Ecosystems", 
"Infrastructure & Ecosystems", "Infrastructure & Ecosystems", 
"Leadership & Strategy", "Leadership & Strategy", "Infrastructure & Ecosystems", 
"Infrastructure & Ecosystems", "Infrastructure & Ecosystems", 
"Infrastructure & Ecosystems", "Infrastructure & Ecosystems", 
"Infrastructure & Ecosystems", "Leadership & Strategy"), Implementation.time.frame = c("Short-term", 
"Short-term", "Short-term", "Short-term", "Short-term", "Mid-term", 
"Long-term", "Short-term", "Short-term", "Mid-term", "Mid-term", 
"Short-term", "Short-term", "Short-term", "Short-term", "Short-term"
), Goal = c("Goal13", "Goal13", "Goal13", "Goal13", "Goal13", 
"Goal12", "Goal12", "Goal11", "Goal11", "Goal11", "Goal11", "Goal11", 
"Goal11", "Goal11", "Goal11", "Goal11")), .Names = c("City", 
"ResiliencyChallenge", "CRI.Dimesnsion.1", "Implementation.time.frame", 
"Goal"), class = "data.frame", row.names = c(NA, -16L))