Question

我成功地使用了具有被动值的情节，但在使用高图时遇到了麻烦。我试图在我闪亮的应用程序中使用它，虽然我似乎无法从反应值中获取输入（）

以下是代码：

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

rv $ userTable根据用户输入看起来不同，类似于：

         "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分别具有可视化所需列的值。

如果需要更多信息，请告知。

Answer 1

也许

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

是测试打印（类（userTable）），打印（类（ColnameX））

Answer 2

管理让它像这样工作：

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
    })

使用highcharter和r shine with reactiveValues（）

2 个答案: