2016-08-17 123 views
2

早安所有:)Highchart選項(點的大小) - R閃亮

我是一個新用戶閃亮,並嘗試通過圖書館提供的例子來訓練。 我有一些與高圖選項的麻煩,我的情節是一個點的線,我想控制點的大小。

下面是簡化的代碼:(使用從 「highchart」 庫,文件夾 「演示」 的一個例子):

###的代碼

library("shiny") 
library("highcharter") 

data(citytemp) 

ui <- fluidPage(
    h1("Highcharter Demo"), 
    fluidRow(
column(width = 4, class = "panel", 
       selectInput("type", label = "Type", width = "100%", 
          choices = c("line", "column", "bar", "spline")), 
       selectInput("stacked", label = "Stacked", width = "100%", 
          choices = c(FALSE, "normal", "percent")), 
       selectInput("theme", label = "Theme", width = "100%", 
          choices = c(FALSE, "fivethirtyeight", "economist", "darkunica", "gridlight", 
             "sandsignika", "null", "handdrwran", "chalk") 
       ) 
     ), 
     column(width = 8, 
       highchartOutput("hcontainer",height = "500px") 
     ) 
    ) 
) 

server = function(input, output) { 
    output$hcontainer <- renderHighchart({ 
     hc <- highcharts_demo() %>% 
      hc_rm_series("Berlin") %>% 
      hc_chart(type = "line") %>% 
      hc_plotOptions(area = list(
       stacking = input$stacked, 
       lineColor = "#ffffff", 
       lineWidth = 1, 
       marker = list(
        lineWidth = 1, 
        radius=10, 
        lineColor = "#ffffff" 
       )))%>% 
      hc_tooltip(pointFormat = '<span style="color:{series.color}">{series.name}</span>: 
         <b>{point.percentage:.1f}%</b> ({point.y:,.0f} millions)<br/>', 
         shared = TRUE) 
     hc 
    }) 
} 

shinyApp(ui = ui, server = server) 

的START ## END代碼

我已經做了一些研究,發現你可以使用「標記」及其選項來控制大小。但是,我的圖表看起來完全獨立於此功能:我嘗試了標記的半徑爲&的幾個值,並且它不會更改任何內容。

有人能告訴我我做錯了什麼嗎? 非常感謝您的幫助!

Madzia

回答

2

嗨圖表是一條線,所以在​​你應該爲一條線,而不是一個區域設置的選項,例如:

hc_plotOptions(
    line = list(     # put line here instead of area 
    stacking = input$stacked, 
    lineColor = "#ffffff", 
    lineWidth = 1, 
    marker = list(
     lineWidth = 1, 
     radius=10, 
     lineColor = "#ffffff" 
    ) 
) 
) 
+0

謝謝!完美的作品! :)(抱歉,延遲,我在同一天回答,但看起來像我的答案沒有考慮) – Madzia