Shiny

问题 I am trying to generate a table using the renderTable function in R shiny and then use the downloadHandler function to download that table/data.frame as a csv file. Somehow I keep getting the following error: An error occured during download: Error downloading http://127:0:0.1:3001/session/ 0303bd426fce88837ae277aa3b406dd/download/downloadData?w= - server replied: Internal Server Error Below is an example code where I generate a simple data frame and try to download it using downloadHander:

问题 I am trying to generate a table using the renderTable function in R shiny and then use the downloadHandler function to download that table/data.frame as a csv file. Somehow I keep getting the following error: An error occured during download: Error downloading http://127:0:0.1:3001/session/ 0303bd426fce88837ae277aa3b406dd/download/downloadData?w= - server replied: Internal Server Error Below is an example code where I generate a simple data frame and try to download it using downloadHander:

问题 I have a very simple shiny app you can run below. It has linked inputs so when you change the "Department" input the "Displayname" is populated with people in that department. I need to go get some data from a database for the "DisplayName" selected. So if Department A & Frank is selected I need to go get Frank's data BUT I cannot pass the display name to the database. Luckily I can pass the "NameToPassToDatabase" but how can I access the corresponsing "NameToPassToDatabase"? In the example

问题 I have a small application, where in I need to load csv files. There are couple of files in my folder say(File1.csv, File2.csv, File3.csv). The moment I load them one by one in R application. I may require following things (Is it possible to achieve this ?) If so can anyone please help me Scenario 1 : 1) The moment I load File1 data. A rhandsontable should be displayed showing File1 is loaded like shown below 2) A renderText displaying "There are 1 no of files" 3) In case I do not need this

问题 I have a shiny app with a number of tabPanels. In one of these panels I want to write a time signal generated in seewave and tuneR to a www subdirectory. If I run the commands on the R-promt, everything works, but I can't get it running in my server.R. I tried observe, but then the input$ variables are not updated: observeEvent(input$button,{ cat("Writing wav file") }) eventReactive(input$button,{ "Inbutton" pi<-4*atan(1) s5<-synth(44100,5,input$freq1,input$amp1*2000,"sine",shape=NULL,p=0, am

问题 I'm experimenting with some code for hover messages on top of ggplot2 objects, and so far it is working quite well, except now the following challenge goes beyond my skills I fear: In an App where I will have about 6 to 72 similar ggplots spread over various pages in my app, I would like to be able to attach the hover javascript to all of them automatically: i.e. change from a single tags$script to a generic solution that works for all plots I tried to build a new plotOutput2 function but I

问题 I am developing a Shiny app which I hope to look like the picture below: However, as I try to achieve this, I am only able to get the following form: I am looking for how to make the output neatly collected, and would appreciate any help. I have looked at a couple of other similar questions here, viz. this and this, but don't think they answer my question (the first talks about adding a mainPanel , but I am using FludiPage and FluidRows . I had thought the columns and rows would automatically

问题 I tried to make a interactive plot within a navbarpage shiny app. The problem is that the range of the input$plot_click$x values (and the input$plot_brush$xmin values ...) is [0;1] - they are not scaled to the data. So I can´t use these values to identifiy rows or something like that. Here is the ui.R code library(shinythemes) shinyUI(navbarPage("Kursqualität",theme = shinytheme("united"), tabPanel("Abstrakte Qualitätsdimensionen", sidebarLayout( sidebarPanel( h4("test") ), mainPanel(

问题 I have had an issue by using the same reactive expression in renderPlot() and in downloadHandler() . I want to use the same reactive expression to minimize maintenance later. I have created two examples which create very simple figures (mwe1 creates a jpeg which you can download, mwe2 does not). I prefer a solution which uses a creative expression which can be both used by renderPlot() and downloadHander() as in mwe2. Is anybody able to help me with this? Thanks in advance! mwe1 <- function()

问题 This post [1]: Shiny's tabsetPanel not displaying plots in multiple tabs contains a perfect example of what I want to achieve. As I don't want to create the same plot too many times but just once the solution proposed does not work for me. The user who answered the below question mentions that it is possible to assign the same plot to two different plotOutputs which is exactly what I want to do do. Could someone please help me figure this out? 回答1: Each plot needs a unique id so you will need