Shiny

问题 I have the shiny app delow in which the user uploads a file. Then there is a column named EventDate which contains Dates. Those dates are passed to a date range Input. There is also a second widget which takes as inputs the unique values of the 1st column of the uploaded file. When the actionbutton is pressed the data frame is subseted based on the picker input. The issue is that Im trying to subset the picker input values based on the date range so I use: #dat<-subset(dat, EventDate>=input

问题 Friends, could you help me with the following question: I am having a conflict when inserting the addPolylines function to generate my second leaflet map. In general, Map 1 involves showing all clusters and Map 2 involves a specific cluster. For this specific cluster I inserted a feature to adhere the same colors as the clusters formed on the map1. The first code is doing the above descriptions correctly. However, I also inserted the second code that refers to addPolylines for the second map.

问题 I am attempting to rbind two data frames in shiny so I can plot them together but I receive an error "replacement has 1 row, data has 0" when I do. I've included my full app below - and I'm assuming the error occurs in these server lines: # create new cases and new deaths data frames and add a New "NAME" value to each row ncdf <- cd[,c(1,4)] nddf <- cd[,c(1,5)] ncdf$name <- "New Cases" nddf$name <- "New Deaths" The app works locally even with the error but when I try to upload it to shinyapps

问题 Based on the question mentioned below. I would like to add dash in front of parent items and select subitems when select parent item. I tried shinytree and shinytreeview but I need a combo box not list, because list expands Using values selected from a javascript based select menu in shiny 来源： https://stackoverflow.com/questions/61797628/select-items-and-its-sub-items-using-values-selected-from-a-javascript-based-sel

问题 EDIT: I included observeEvent() in server.R as described in this video : https://www.youtube.com/watch?v=BzE1JmC0F6Q. It works partially. When I update A and B, the graph gets updated, but the columns C,D and E are giving wrong values and the number of rows keep growing. Any help is appreciated. I have 2 columns A and B. The user has the option to drag and drop values into A and B , and hence I am using rhandsontable (Source: https://jrowen.github.io/rhandsontable/) I have the code below for

问题 EDIT: I included observeEvent() in server.R as described in this video : https://www.youtube.com/watch?v=BzE1JmC0F6Q. It works partially. When I update A and B, the graph gets updated, but the columns C,D and E are giving wrong values and the number of rows keep growing. Any help is appreciated. I have 2 columns A and B. The user has the option to drag and drop values into A and B , and hence I am using rhandsontable (Source: https://jrowen.github.io/rhandsontable/) I have the code below for

问题 I am trying to create a shiny app that uses tabsetPanel, however when I create the tab, the content in the app no longer fills the whole space of the window and leaves large white gaps on the right and below the output. Below is a very basic example that it happens to. Without tabs the app works perfectly as a fluid page but for the work I'm doing I need it split up into tabs. A simple example: `library(shiny) # Define UI for application that draws a histogram ui <- fluidPage( # Application

问题 Friends, I would like to increase the width of the text box made by bsPopover. Make it more horizontal, that is, increase the width of the text box. It's possible?? The executable code is below. Any help is appreciated. library(shinyBS) library(shiny) DES_filter1<-paste("Sudden she seeing garret far regard. By hardly it direct if pretty up regret. Ability thought enquire settled prudent you sir. Or easy knew sold on well come year. Something consulted age extremely end procuring. Collecting

问题 Friends, I would like to increase the width of the text box made by bsPopover. Make it more horizontal, that is, increase the width of the text box. It's possible?? The executable code is below. Any help is appreciated. library(shinyBS) library(shiny) DES_filter1<-paste("Sudden she seeing garret far regard. By hardly it direct if pretty up regret. Ability thought enquire settled prudent you sir. Or easy knew sold on well come year. Something consulted age extremely end procuring. Collecting

问题 In the code below another user has successfully demonstrated a workaround on how to load an image URL into a Plotly graph. The image data is taken from the data frame and then, by employing the custom data tool, appears as a tooltip on hover at each data point in the graph. Is there a way to do something similar using images stored locally, simply using the file directory? library(shiny) library(shinydashboard) library(plotly) # Data -----------------------------------------------------------