I have a problem with my simple RMarkdown document that uses shiny widgets. I mean, it works fine locally, but when I want to drop it into ShinyServer, it doesn't work at all. In fact, this does not make any mistakes.
--- title: "Test" author: "" date: "17.08.2015" runtime: shiny output: html_document --- ```{r, echo = FALSE} library(ggplot2) ``` ```{r, echo = FALSE} data(mtcars) selectInput('name', 'Choose a cylinder:', choices = sort(unique(mtcars$cyl)), selected = sort(unique(mtcars$cyl))[1]) data <- reactive(subset(mtcars,cyl == input$name)) number <- reactive(which(sort(unique(mtcars$cyl)) == input$name)) ``` ```{r, echo = FALSE} renderPlot(ggplot(data(),aes(qsec, mpg))+ geom_point(size = 6)) ```
I am using ShinyServer v1.3.0 and am working on Revolution R Open 3.2.1.
sessionInfo() other attached packages: [1] ggplot2_1.0.1 rmarkdown_0.7 shiny_0.12.1 [4] RevoUtilsMath_3.2.1 loaded via a namespace (and not attached): [1] Rcpp_0.11.6 digest_0.6.8 MASS_7.3-40 mime_0.3 [5] grid_3.2.1 R6_2.0.1 plyr_1.8.3 xtable_1.7-4 [9] gtable_0.1.2 magrittr_1.5 scales_0.2.5 stringi_0.5-5 [13] reshape2_1.4.1 proto_0.3-10 tools_3.2.1 stringr_1.0.0 [17] munsell_0.4.2 httpuv_1.3.2 colorspace_1.2-6 htmltools_0.2.6
source share