ShinySky.incubator

Various Shiny UI widgets/components in incubator status. NOT maintained

Install

# if devtools not alrady installed
if (require(devtools)) install.packages("devtools")
devtools::install_github("AnalytixWare/shinysky.incubator")
library(shinysky.incubator)
shinysky.incubator::run.shinysky.example()

Usage

library(shinysky.incubator)

jsTree

ui.R

jstree("jstree1",with(tags,ul(li("empty_folder"),li("folder1",ul(li("file1"),li("file2"))))))

server.R

observe({
	print(paste0(input$jstree1,collapse=", "))
})

jscolorInput

ui.R

jscolorInput("jscolorInput1")

alt text

Example

shinysky.incubator::run.shinysky.example()