0
這可能已經用java回答了,但我試圖在r中執行此操作。我遺漏了大部分代碼,因爲它有很多。高分辨率餅圖不顯示在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腳本中運行服務器代碼,那麼效果很好。
謝謝。