shinydashboard

Tab Box CSS for shinydashboard

由 心不动则不痛 提交于 2019-12-06 03:11:08
问题 I'm trying to change the tab style for tabBox in shinydashboard . I was able to change the background of the tabs that aren't selected, but I can't change the background of the tab that is selected or the text that appears in each tab. This is what I added to a custom.css file to change the unselected tab backgrounds: .nav-tabs { background-color: #006747; } I tried stuff like .nav-tabs .active but I couldn't get anything to work. Also if anybody knows how to change the small colored sliver

R Shiny - Automatically hide the sidebar when you navigate into tab items

由 时间秒杀一切 提交于 2019-12-06 02:24:43
问题 I have a Shiny app - simplified example here - and I want the sidebar to hide dynamically when I navigate into tab items. Indeed users will connect to the app mainly with their mobile. With the help of the post Hide sidebar in default in shinydashboard, I know how to hide by default the sidebar when you arrive on the app, but after the sidebar is always displayed. Here is my actual code : ### Load librairies library(shiny) ; library(shinydashboard) ; library(shinyjs) library(dplyr) ### Load

How to add style elements to dynamically rendered textInput in Shiny

由 只谈情不闲聊 提交于 2019-12-06 02:23:02
Hello Stack Overflow, in recent questions by me I've solved some major issues related to dynamically rendered UI elements and dynamically created observers for those with the help of some amazing people here. see i.e. here: Dynamically rendered UI: how to delete old reactive variables on second run Now I'm building a part of it that dynamically renders textInput fields. The rendering and monitoring shouldn't be a problem because I can apply the same way of coding as for the actionbuttons we've already made, but the styling of these elements is proving a problem. As far as I know there are 2

R shinydashboard - change height of valueBox

由 走远了吗. 提交于 2019-12-06 00:14:22
Given a shinydashboard ui.R library(shinydashboard) library(shiny) dashboardPage( dashboardHeader(), dashboardSidebar(), dashboardBody( valueBoxOutput(outputId = "vb") ) ) server.R library(shinydashboard) library(shiny) function(input, output, session) { output$vb <- renderValueBox({ valueBox(subtitle = "Hello", value = "hi", width = 6, color="blue" ) }) } Question Is it possible to change the height of the valueBox ? I've tried using tags but can't get them to work so I'm obviously missing something: dashboardPage( dashboardHeader(), dashboardSidebar( # tags$head(tags$style("#vb{height:500px}

how to manually expand a submenu in a shiny dashboard side bar

由 雨燕双飞 提交于 2019-12-05 19:54:56
I'm trying to manually expand a submenu in a sidebar in shiny dashboard. The updateTabItems function only works with normal menus, but not with nested menus. Here is basic example (modified from the updateTabItems documentation) to show the problem. If I clicked on 'Switch tab', it switches the menus, but it doesn't expand the first menu that has a submenu. It seems that it only selected the submenu but doesn't expand the tree. library(shiny) library(shinydashboard) ui <- dashboardPage( dashboardHeader(title = "Simple tabs"), dashboardSidebar( sidebarMenu( id = "tabs", menuItem("Dashboard",

Making Shiny UI Adjustments Without Redrawing Leaflet Maps

由 ▼魔方 西西 提交于 2019-12-05 16:11:39
The Problem I am creating a shinydashboard to help a client explore some spatial data. The UI design I'd like to achieve allows the user to easily switch between two layouts: Map Only Map + Data Table I'm having trouble implementing this design because every time the user switches between layouts two problems occur: The map is redrawn The ActionButtons break, preventing the user from exploring the data My guess is that is may be a namespace issue, but I don't have any experience creating modules (seems complicated and scary). Does anyone have a good strategy for resolving these issues?

R shiny future: plan(multiprocess)/plan(multicore) + Kill long running process

由 风格不统一 提交于 2019-12-05 07:59:50
I am writing this to seek some help in using plan(multiprocess) or plan(multicore) and killing long running processes in my shiny app. The app has multiple future events (long running processes) that run on clicking their corresponding actionButton. Below is an example app of future() command used within the server function in the app. And i have been using stopMulticoreFuture(fut) to kill the processes. library(shiny) library(shinydashboard) library(promises) plan(multicore) library(ipc) sidebar <- dashboardSidebar(width = 200, sidebarMenu(id = "tabs", menuItem("File", tabName = "tab1", icon

reproducing shiny using flexdashboard template

由 主宰稳场 提交于 2019-12-05 03:28:31
问题 I borrowed this code below from the shinygallery and made some changes. Basically this uses fluidPage . I am interested in redoing the same thing using flexdashboard . I have gone through the flexdashboard userguide. but the descriptions on that website are in some rmarkdown or sweave format ?? which I am not familiar with. So if I can see the flexdashboard version of this example without the markdown or sweave then i can easily relate to different components and build on that. Any tips or

Shiny dashboard, user authentication

由 ⅰ亾dé卋堺 提交于 2019-12-05 02:28:28
问题 I am trying to include a shiny dashboard inside a code snippet I found (https://github.com/treysp/shiny_password) that wraps a shiny app inside functions to set up user authentication. This snippets works perfectly with fluidPage() but I noticed that it is not working when I wrap a dhasboardPage(): I try to log in, type in my username and my password, click on log in and then nothing happens, I am stuck on the login page. No error message in the console I use to fire up the server by calling

ShinyApp - Dropbox authentication with rdrop2

由 瘦欲@ 提交于 2019-12-04 22:01:57
I stored files on my dropbox and I am accessing them through rdrop2 on a shinyapp hosted at shinyapps.io. The following code works great on my laptop but aborts when I deploy my app on shinyapp.io and freezes an opaque screen. Any clues on why and how to troubleshoot? Thanks a bunch! - stephane Here is the code I am using (from https://github.com/karthik/rdrop2 ): token<-drop_auth() saveRDS(token, "droptoken.rds") token <- readRDS("droptoken.rds") ZIPFile<-drop_read_csv(as.character(ZIPCode),sep="",dtoken=token) And the ShinyApp log : 2015-10-16T17:55:46.965850+00:00 shinyapps[64206]: Warning:
订阅 shinydashboard