用于滑动输入的自定义播放按钮?

时间:2015-06-12 12:40:33

标签: r shiny

http://shiny.rstudio.com/reference/shiny/latest/sliderInput.html表示您可以使用HTML标记或字符向量修改滑块输入中播放按钮的外观。我希望我的播放按钮更大或使用图像,我无法让它工作,也无法找到在Google上使用playButton或pauseButton参数的人的示例。有什么提示吗?

将以下内容添加为参数:

use std::fmt;

pub enum TestEnum<'a> {
    Foo(&'a str),
    Bar(f32)
}

impl<'b> fmt::Display for TestEnum <'b> {
    fn fmt(&self, f : &mut fmt::Formatter) -> fmt::Result {
        match self {
            &TestEnum::Foo(x) => write!(f, "{}", x),
            &TestEnum::Bar(x) => write!(f, "{}", x),
        }
    }
}

fn main() {
    let cell = TestEnum::Foo("foo");
    println!("Printing");
    println!("{}", cell);
}

给出一个未使用的参数错误

2 个答案:

答案 0 :(得分:1)

playButton不是sliderInput的参数。相反,playButton是animationOptions的一个参数,用于sliderInput的动画参数。

详情请见此处: http://shiny.rstudio.com/reference/shiny/latest/sliderInput.html

但是,我尝试以这种方式设置自定义播放按钮,但它不起作用。您可能需要自己编写滑块的HTML,这一点都不难。以下是带动画控件的通用滑块的HTML输出:

      <div class="form-group shiny-input-container">
        <label class="control-label" for="bins">Number of bins:</label>
        <input class="js-range-slider" id="bins" data-min="1" data-max="50" data-from="30" data-step="1" data-grid="true" data-grid-num="9.8" data-grid-snap="false" data-prettify-separator="," data-keyboard="true" data-keyboard-step="2.04081632653061"/>
        <div class="slider-animate-container">
          <a href="#" class="slider-animate-button" data-target-id="bins" data-interval="1000" data-loop="FALSE">
            <span class="play">
              <i class="glyphicon glyphicon-play"></i>
            </span>
            <span class="pause">
              <i class="glyphicon glyphicon-pause"></i>
            </span>
          </a>
        </div>
      </div>

您可以编辑播放/暂停部分的HTML,以查看您喜欢的内容以及滑块的各种参数。

答案 1 :(得分:0)

我知道这是一个古老的问题,但由于没有太多信息,因此想添加另一种方法!

如果只是想增大“播放/暂停”按钮,则可以使用CSS做到这一点。需要注意的重要一点是,它是通过更改图标的字体大小来完成的,而不是通过更改其他任何大小参数(例如,高度或宽度)来完成的。在用户界面中添加这样的一行(我的代码位于DashboardBody()的开头,尽管这取决于您所拥有的应用程序的结构):

tags$head(tags$style(type='text/css', ".slider-animate-button { font-size: 20pt !important; }"))