Question

这可能已经用java回答了，但我试图在r中这样做。我遗漏了大部分代码，因为它有很多。

library(readxl)
library(dplyr)
library(shiny)
library(highcharter)
library(data.table)

shinyUI(fluidPage(
  titlePanel("xxx"),
    fluidRow(
      #...
    fluidRow(
      column(6,
        highchartOutput("column")     
      ),
      column(3,
        highchartOutput("pie.selected")
      ),
      column(3,
        highchartOutput("pie.prior")
      )
    )
))

shinyServer(function(input, output) {
#...
  output$pie.selected <- renderHighchart({
    pie.selected <- highchart() %>% 
      hc_add_series(name = "Current Valuation",
                    type = "pie",
                    tooltip = list(
                      valueDecimals = 1,
                      valueSuffix = " %"
                    ),
                    data = list(
                    list(y = 100*pd.selected/ult.selected,
                         name = "Paid",
                         color = colors$Emrl
                    ),
                    list(y = 100*co.selected/ult.selected, 
                         name = "Case Outstanding",
                         color = colors$Ruby
                    ),
                    list(y = 100*ibnr.selected/ult.selected, 
                         name = "IBNR",
                         color = colors$Saph
                    )
      )
    ) 
  })
#...
})

我之前从未制作过饼图，并认为它将以条形图或柱形图的方式完成，但我想我错过了一些东西。我遵循了这个：http://jkunst.com/highcharter/highcharts.html（饼图的第一个例子），但是当我运行应用程序时它根本就没有加载。如果我只是在r脚本中运行服务器代码，那就很好用了。

感谢。

Answer 1

显然输入的名称在Highchart中没有句号。

高图饼图不显示在r中

1 个答案: