Shiny

问题 How can I put an image,title and buttons in the same line inside the header of a shiny dashboard? It looks like that the title remains hidden above the buttons but it is supposed to be between image and button since I use tags$li() . library(shiny) library(shinydashboard) library(shinydashboardPlus) library(shinyjs) mytitle <- paste0("Life, Death & Statins") dbHeader <- dashboardHeaderPlus( titleWidth = "0px", tags$li(a(href = "http://https://www.uow.edu.au/", # '', div(style = "margin-left:

问题 Friends, is it possible to change the color tone of a shinytheme used? In my case I am using "united" which uses orange and gray. However I would like to make a slightly darker orange, is it possible to make this change? If so, can you please help me? The executable code is below. library(shinyBS) library(shiny) library(shinyjs) ui <- fluidPage( navbarPage(theme = shinytheme("united"), collapsible = TRUE, titlePanel("Old Faithful Geyser Data"), sidebarLayout( sidebarPanel( radioButtons(

问题 I am still relatively new at working in R shiny and I am trying to load several excel files into an R-shiny app. Part of the problem is that I need to be able to pull several files from a dropbox folder without specifying what the data file is called. So I need to be able to tell R to read in all the files from a dropbox folder. Also the files I am working with are in .xlsx format and I will need to read them into R as such. I tried to do this first by using a folder on my computer desktop. I

问题 I am still relatively new at working in R shiny and I am trying to load several excel files into an R-shiny app. Part of the problem is that I need to be able to pull several files from a dropbox folder without specifying what the data file is called. So I need to be able to tell R to read in all the files from a dropbox folder. Also the files I am working with are in .xlsx format and I will need to read them into R as such. I tried to do this first by using a folder on my computer desktop. I

问题 I am new to R and R shiny, and have been working on putting together a statistics application that will allow the user to import files, and then run different statistics programs on the data. The fileData function had been working fine for me until recently, and now whenever I attempt to upload a file, nothing opens. I have tried everything I can think of to get it to run, but it appears the file won't attach to the function. Any help will be very much appreciated! library(shiny) library

问题 I am new to R and R shiny, and have been working on putting together a statistics application that will allow the user to import files, and then run different statistics programs on the data. The fileData function had been working fine for me until recently, and now whenever I attempt to upload a file, nothing opens. I have tried everything I can think of to get it to run, but it appears the file won't attach to the function. Any help will be very much appreciated! library(shiny) library

问题 I am trying to run a shiny application through a function called "OpenTree()", this function help me to start my application in the background but the issue that I have is that the argument of this function is fileName. I want that my shinyapp recognize the fileName that the function OpenTree returns and then deploy the app. Example createTree <- function(fileName) { path_aux <- paste0("output/OpenTree_",fileName, ".json") path_aux <- paste0(path_aux) assign("path", path_aux, envir =

问题 I want to remove the stripes in te limit between de table data and the header, or at least, change its color. I want to make an schedule for teachers with their respective classroom. options = (list(pageLength = 40, dom = 't', ordering = FALSE, columnDefs = list(list(className = 'dt-center', targets = 0:5)), initComplete = JS("function(settings, json) {", "$(this.api().table().header()).css({'background-color': '#3b5998', 'color': '#ffffff', 'border-right': '1px solid #ffffff'});","}")) )) %>

问题 I am trying to add some tooltips to different action buttons in my shiny app through the bsTooltip() function of the shinyBS package, and I would like to modify the width just of a specific tooltip box. To do that, I can specify the HTML tags at the beginning of my UI and modify directly the CSS, but if I use the simple element .tooltip {...} I modify the width of every tooltip in my code: Below you can find a minimal reproducible example with two different action buttons: library(shiny)

问题 The JavaScript library Handsontable has an event afterColumnResize, triggered when a column is manually resized. How to use it with the 'rhandsontable' package in Shiny? 回答1: Here is how: library(shiny) library(rhandsontable) library(htmlwidgets) jsCode <- c( "function(el, x) {", " Handsontable.hooks.add('afterColumnResize', function(index, size){", " Shiny.setInputValue('newsize', {index: index+1, size: size});", " });", "}" ) ui <- fluidPage( rHandsontableOutput("dataTable"), br(),