выборочный цвет фона с помощью gvis orgchart с блестящей приборной панелью r - PullRequest
0 голосов
/ 02 октября 2018

Руководство пользователя для gvisOrgChart предлагает использовать nodeClass вместе с CSS для получения желаемых результатов - вот код, который я пробовал, но он не работал

в разделе пользовательского интерфейса,

dashboardBody(
  tags$head(
    tags$link(rel ="stylesheet", type ="text/css", href ="United.css"),
    tags$style(".progress-bar{background-color:green;}"),
    tags$style("chart_node_normal{background-color:green;}"),
    tags$style("chart_node_select{background-color:red;}")
  ),
....
  fluidRow(
    style = "max-width: 180vh; overflow-x:auto;",
    column(12,htmlOutput("cgraph_1"))
  ),

и затем в коде, после построения данных в кадре данных CallTree

CallTree$NodeClass <- "chart_node_normal"
CallTree[1,]$NodeClass <- "chart_node_select"
g1 <- gvisOrgChart(CallTree, idvar = "CallTo", parentvar = "Callfrom", tipvar = "remarks", options = list(nodeClass = "NodeClass",color="cyan",fontSize=10,allowHtml=TRUE,allowCollapse=TRUE))

Ожидается, что цвет первого узла изменится на красный и останется зеленым - но не произойдет

Запроспомощь

С уважением,

Шами

...