R Shiny server dateRangeInput error -
i keep finding error
error: not find function "daterangeinput" whenever try run following application.
server.r
library(shiny) library(ggplot2) library(shinyext) shinyserver(function(input, output, session) { output$date <- rendertext({ as.character(input$date) }) output$daterange <- rendertext({ as.character(input$daterange) }) observe({ updatedateinput(session, 'date_controlled', value = as.character(input$date), min = as.character(input$daterange[1]), max = as.character(input$daterange[2]) ) updatedaterangeinput(session, 'daterange_controlled', min = as.character(input$daterange[1]), max = as.character(input$daterange[2]), start = as.character(input$daterange2[1]), end = as.character(input$daterange2[2]) ) }) })
my ui.r
library(shiny) library(ggplot2) library(shinyext) # define ui application plots random distributions shinyui(pagewithsidebar( # application title headerpanel("kemri wellcome trust programme"), # sidebar slider input number of observations sidebarpanel( imageoutput("logo", height = "153px", width="272px"), helptext("note: while data view show specified", "number of observations, summary still based", "on full dataset."), selectinput("graph", "choose graph:", list("histogram" = "hist", "pie chart" = "pie", "time series" = "time", "box plot"="box", "violin plot"="violin")), daterangeinput('daterange', label = 'date range: dd/mm/yy, en, range limit, weekstart=1. controls start , end of date range input in main panel.', start = sys.date()-1, end = sys.date()+1, min = sys.date()-10, max = sys.date()+10, separator = " - ", format = "dd/mm/yy", startview = 'year', language = 'en', weekstart = 1), submitbutton("update view") #sliderinput("obs","number of observations:", min = 0, max = 1000, value = 500) ), # show plot of generated distribution mainpanel( dateinput("date_controlled", "date input controlled sidebar"), daterangeinput("daterange_controlled", "date range input controlled sidebar") ) ))
what problem?? using latest stable shiny-server , r 3.0.x. examples i've seen work, why doesn't 1 work?
the daterangeinput
in newer version of shiny on cran. can install shiny's github repo these steps:
install.packages('httpuv', repos=c(rstudio='http://rstudio.org/_packages', cran='http://cran.rstudio.com')) install.packages('devtools') # if don't have devtools installed devtools::install_github('shiny', 'rstudio')
after following these steps, sure restart r process before try again.
Comments
Post a Comment