Shiny

问题 I am trying to develop a shinydashboard application. As users select their dataset and variables, I provide the option to select the order, color and shape. However, in the pickerInput I am also providing another (4th) item which is the value of the variable selected for which the order, color and shape has been assigned. I need this 4th item/variable for further processing, such as, subsetting data. I would like to hide this 4th item or disable the option for users of the app to select, as

问题 I am trying to hide the spinner at the beginning when no choice has been made yet. This is a simple example of what I have achieved so far. library(shinycssloaders) ui <- fluidPage( selectInput(inputId = "something", label = "Select something:", choices = c('','None', 'All', 'Some'), selected = ''), withSpinner(textOutput(outputId = "text") ) ) server <- function(input, output) { observe({ toggle(id = 'text', condition = F) if(nchar(input$something) > 0 ){ toggle(id = 'text', condition = T)

问题 In a Shiny app, is there a way to keep old reactive output and display it in the app along with new reactive output? To provide an example: say I want to display the summary table of a linear model to which I gradually add more variables. I currently have a checkboxGroupInput panel using which I select the explanatory variables to be included in the model, and then I render a table which contains the summary of the model estimated using the selected variables. Now when I decide to use a

问题 In a Shiny app, is there a way to keep old reactive output and display it in the app along with new reactive output? To provide an example: say I want to display the summary table of a linear model to which I gradually add more variables. I currently have a checkboxGroupInput panel using which I select the explanatory variables to be included in the model, and then I render a table which contains the summary of the model estimated using the selected variables. Now when I decide to use a

问题 I used RStudio to read in a csv file and used Shiny to build an app as an interactive table, the cell I selected right now as shown in the picture is pre-filled. enter image description here I want to change the value given pre-defined options in a dropdown list, such as, "Keep Dataset", "Pass", etc., I searched hundreds of materials and I literally ran out of my bullets...... PLEASE HELP! 回答1: We can do that with the JavaScript library CellEdit. Download the file dataTables.cellEdit.js. By

问题 Issue: I'm looking to remove the showing 1 to n of n entries field in shiny DT. Please see picture below of what I would like to REMOVE. Any insight is much appreciated. 回答1: You can use the dom option to determine which elements of the data table are shown. In the call to data table, you pass a named list of options to the options argument. dom accepts a character string where each element corresponds to one DOM element. # only display the table, and nothing else datatable(head(iris),

问题 I would like to remove 'global search' option from my application, but leave 'column search' option. Any ideas? I've tried different paramethers like searching=FALSE, filtering='none' ... None of this works properly. My code: server.R: library("shiny") library("DT") data(iris) shinyServer(function(input, output) { output$tabelka <- DT::renderDataTable({ datatable(iris, filter="top", selection="multiple", escape=FALSE) }) }) ui.R library("shiny") library("DT") shinyUI(fluidPage( DT:

问题 i need to display interactive association rules plot in shiny. For that i am using arulesViz package. But when i am trying to display interactive scatter plot using the below: shinyServer(function(input, output) { output$plot1<-renderPlot({ rules <- apriori(transaction_all[[as.numeric(input$level)]],parameter=list(support=input$support,confidence=input$confidence)) plot(rules, measure=c("support", "lift"), shading="confidence",interactive = TRUE) }) Its throwing an error: Error in convertUnit

问题 i need to display interactive association rules plot in shiny. For that i am using arulesViz package. But when i am trying to display interactive scatter plot using the below: shinyServer(function(input, output) { output$plot1<-renderPlot({ rules <- apriori(transaction_all[[as.numeric(input$level)]],parameter=list(support=input$support,confidence=input$confidence)) plot(rules, measure=c("support", "lift"), shading="confidence",interactive = TRUE) }) Its throwing an error: Error in convertUnit

问题 I would like to extract the element name, and not the specific value, from a list used for the choices argument in selectInput() from R Shiny. The selectInput function looks like this: # ... selectInput("xvar", "What is the predictor variable?", choices = list("MPG" = "mpg", "Cylinders" = "cyl", "Engine Displacement" = "disp", "Horse Power" = "hp", "Gears" = "gear"), # ... In my server.R code I would like to use, for example, "Cylinders" and not "cyl" as an axis label. For example (using