使用highcharter和r shiny with reactiveValues（）

我成功地使用了反應值，但在使用highcharter時遇到了問題。我試圖用我的ITIN閃亮的應用程序，但我似乎無法給它從reactiveValues（）使用highcharter和r shiny with reactiveValues（）

這裏輸入的代碼是：

output$highchartGraph <- renderHighchart({ 
    hchart(rv$userTable, "scatter", hcaes(x = rv$ColnameX, 
              y = rv$ColnameY) 
    )

RV $用戶表看起來不同，這取決於用戶輸入，類似於：

  "Date" "sulfate" "nitrate" "ID" 
32 "2002-02-01"  2.07  0.774 8 
38 "2002-02-07"  3.25  1.280 8 
44 "2002-02-13"  1.68  1.140 8 
62 "2002-03-03"  1.85  1.310 8 
74 "2002-03-15"  5.72  0.599 8 
80 "2002-03-21"  6.71  1.390 8

rv $ ColnameX/Y分別具有所需列的值以可視化。

如果需要更多的信息，請告訴。

來源

2017-06-02 Claud H

管理，使其像這樣的工作：

highchartGraph <- renderHighchart({ 
     userTable <- rv$userTable 
     X <- rv$ColnameX 
     Y <- rv$ColnameY 
     outp <- highchart() %>% 
      hc_title(text = "highcharter") %>% 
      hc_add_series(data = cbind(userTable[[X]], userTable[[Y]]), 
          type = "scatter") 
     outp 
    })

來源

2017-06-02 13:54:03

也許

output$highchartGraph <- renderHighchart({ 
     userTable <- rv$userTable 
     ColnameX <- rv$ColnameX 
     ColnameY <- rv$ColnameY 
     hchart(userTable, "scatter", hcaes(x = ColnameX, 
              y = ColnameY) 
     ) 
    })

是腸道測試打印（類（用戶表）），印刷（類（ColnameX））

來源

2017-06-02 11:57:48 Shen

它在我提供的代碼片段後輸出$ highchartGraph < - highchartGraph' –

將片段更改爲更清晰 –

查看新編輯 – Shen

使用highcharter和r shiny with reactiveValues（）

回答

相關問題