button: Add buttons

Description Usage Arguments Details Author(s) Examples

Description

Add buttons to your fullPage, pagePiling and multiPage.

Usage

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
fullButton(..., outline = FALSE, clear = FALSE)

fullButtonTo(..., section, slide = 0, outline = FALSE, clear = FALSE)

fullButtonUp(..., outline = FALSE, clear = FALSE)

fullButtonDown(..., outline = FALSE, clear = FALSE)

fullButtonRight(..., outline = FALSE, clear = FALSE)

fullButtonLeft(..., outline = FALSE, clear = FALSE)

fullButtonCustom(..., fun, outline = FALSE, clear = FALSE)

pageButton(..., outline = FALSE, clear = FALSE)

multiButton(..., outline = FALSE, clear = FALSE)

pageButtonUp(..., outline = FALSE, clear = FALSE)

pageButtonDown(..., outline = FALSE, clear = FALSE)

pageButtonTo(..., section, outline = FALSE, clear = FALSE)

multiButtonUp(..., outline = FALSE, clear = FALSE)

multiButtonDown(..., outline = FALSE, clear = FALSE)

multiButtonTo(..., section, outline = FALSE, clear = FALSE)

Arguments

...

any other element

outline, clear

set outline or clear button.

section, slide

target section and/or slide.

fun

Javascript function to pass to button.

Details

See example for *Custom button.

Author(s)

John Coene, [email protected]il.com

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
library(shiny)

if(interactive()){

  ui <- fullPage(

    center = TRUE,

    fullSection(
      center = TRUE,
      h1("Buttons")
    ),
    fullSection(
      fullButton("Visit site", href = "https://john-coene.com")
    ),
    fullSection(
      fullButtonDown("Move Down", outline = TRUE)
    ),
    fullSection(
      fullButtonUp("Move up")
    ),
    fullSection(
      fullButtonTo("Move to first section", section = 1)
    ),
    fullSection(
      center = TRUE,
      fullSlide(
        fullButtonRight("Slide right", clear = TRUE)
      ),
      fullSlide(
        fullButtonLeft("Slide left", clear = TRUE)
      )
    ),
    fullSection(
      p("Disables keyboard scrolling"),
      fullButtonCustom("Custom button",
        fun = "$.fn.fullpage.setKeyboardScrolling(false, 'down, right');")
    )
  )

  server <- function(input, output){}

  shinyApp(ui, server)
}

RinteRface/fullPage documentation built on Jan. 17, 2019, 6 a.m.