在R Shiny中的旋钮输入显示后添加百分比符号的问题

时间:2019-05-07 23:13:49

标签: javascript jquery r web shiny

我一直在尝试在Shiny应用中显示我的数字输入后添加一个百分比符号。

在咨询了类似的posts后,他们解决了直接使用jQuery库的问题,并尝试遵循repo上的说明,我想我可以通过使用标签添加简短脚本来进行更改。到目前为止,我一直在UI文件中尝试这种变化:

...
       knobInput(inputId = "population",
                         label = "Percentage of the Population",
                         min = 0,
                         max = 100, 
                         value = 100,
                         width = '100%',
                         displayPrevious = T),
             tags$script(HTML("
    $(\".dial\").knob({
      'draw' : function () 
      {
        $(this.i).val(this.cv + '%')
      }
    });")),
...

这不会引起任何问题,并且旋钮输入将正常显示,但显示屏中不会显示百分比符号。我还尝试将script标签嵌套在head标签中,例如:

...
             tags$head(tags$script(HTML("
    $(\".dial\").knob({
      'draw' : function () 
      {
        $(this.i).val(this.cv + '%')
      }
    });"))),
...

但是这也无济于事。我应该尝试其他方法吗?还是我执行不正确的东西?

2 个答案:

答案 0 :(得分:1)

我对roundSlider执行了相同的要求,请查看以下演示:

DEMO

可以根据您的要求进行高度自定义,希望这对您有所帮助。

答案 1 :(得分:0)

旋钮输入 pre = 中有一个用于输入,然后放置您的符号