shinybs

Tooltip in shiny UI for help text

由 吃可爱长大的小学妹 提交于 2020-01-12 16:08:26
问题 I want to place a help text for check-box label as a tooltip. In the following example I use the shinyBS package - but I only get it to work for the title of the checkbox input group. Any ideas how it could work after the "Lernerfolg" or "Enthusiasmus" labels? library(shiny) library(shinyBS) server <- function(input, output) { output$distPlot <- renderPlot({ hist(rnorm(input$obs), col = 'darkgray', border = 'white') output$rendered <- renderUI({ checkboxGroupInput("qualdim", tags$span(

Add Tooltip to Tabs in Shiny

由 折月煮酒 提交于 2019-12-24 03:12:11
问题 I am trying to add tooltips/popovers using the shinyBS package for a Shiny application but am having an issue due to tabs don't have input/ids. This is preventing the tooltip from firing. Any thoughts? library(shiny) library(shinyBS) shinyApp( ui = tagList( navbarPage( theme = "cerulean", # <--- To use a theme, uncomment this "shinythemes", tabPanel(id="test","Navbar 1", bsTooltip("test", title="Test Title", trigger = "hover"), sidebarPanel( fileInput("file", "File input:"), textInput("txt",

Increase width of popify pop-up from shinyBS

由 血红的双手。 提交于 2019-12-23 12:43:45
问题 I've created a pop-up with the popify function from the shinyBS package in Shiny. I want to have a pop-up on the bottom of my filter that is as wide as my filter itself. I can't find anything in the documentation about this. screenshot: Example code: library(shiny) library(shinyBS) shinyApp( ui = fluidPage( sidebarLayout( sidebarPanel( tags$span( popify( sliderInput("bins", "Number of bins:", min = 1, max = 50, value = 30), 'a very long popup',"1. I want everything behind 1 on one line and

shinyBS Modal within checkbox group

由 我是研究僧i 提交于 2019-12-23 12:27:01
问题 I use shinyBS::bsModal() to place explanations of the UI elements there. It works great when I place a bsButton() behind the title of the checkbox. Now I want to place it behind the checkbox options. A first hint could be this answer where the same for a tooltip is done (but my modification do not work). Minimal Example: library(shiny) library(shinyBS) ui <- fluidPage( sidebarLayout( sidebarPanel( checkboxGroupInput("qualdim", tags$span("Chekboxoptions", bsButton("modalbt", "?", style =

Capture label of actionButton in Shiny app

由 ╄→尐↘猪︶ㄣ 提交于 2019-12-23 04:11:44
问题 What's the best way to get the label of an actionButton that is clicked? I have an actionButton that has the label updated. When the user clicks, I need to capture that. I tried input$action2.label and input$action2.text, but neither worked. ui.R library(shiny) shinyUI( fluidPage( tags$head(tags$style( HTML(' { background-color: #dec4de;} #action4 { width: 275 px; color:red; background-color:yellow } #action1, #action2, #action3 { color:black; background-color:lime } body, label, input,

Change backdrop for a bsModal in Shiny app

由 為{幸葍}努か 提交于 2019-12-13 17:03:28
问题 I am developing a Shiny app and I need to make sure the end users won't accidentally close a bsModal, because there are some action buttons on it. I've done some research and learned I need to overwrite backdrop and keyboard parameters, but even though I've seen some suggestions, I have no idea where exactly this needs to sit in my code. I am not proficient with JavaScript and very new to Shiny, so even though it feels like a simple task, I cannot get this right. In case anyone needs it, here

R Shiny: Use navbarPage with bsModal by shinyBS

由 坚强是说给别人听的谎言 提交于 2019-12-13 01:33:57
问题 I'm trying to add a tabPanel in navbarPage so that when you click on it opens a modal window instead of a new tab. The snippet below is not valid because tabPanel does not have an id parameter. library(shiny) library(shinyBS) shinyUI(fluidPage( navbarPage("Sample App", id = "main_menu", tabPanel("Open Modal", id = "moda")), bsModal("modal1", "Example", "moda", p("This is a modal")) ) If I edit the generated HTML code from browser, I can make this possible by changing the line <a href="#tab

Shiny checkbox input tracking

由 两盒软妹~` 提交于 2019-12-12 03:06:55
问题 I am currently working on an application form using Shiny. My main page will consist of a table that will have a click button which will open a new modal window that will display the application form details. Once the save button is clicked the data will get stored in my DB in the backend. I have given a sample example of my app using mtcars. My question is a two parter. I have added checkbox to the main page rows and wish to track the click of these check boxes so that I can check the

add popovers to shiny app?

由 杀马特。学长 韩版系。学妹 提交于 2019-12-04 12:22:54
问题 I would like to add a (?) next to the title of a widget so that the user can hover or click it and get extra information and a link they can click. This is what I have right now: ## app.R ## library(shiny) library(shinydashboard) library(shinyBS) # Header header <- dashboardHeader() # Sidebar sidebar <- dashboardSidebar(fileInput("chosenfile", label = h4("File input"), accept = ".csv"), bsButton("q1", label = "", icon = icon("question"), style = "info", size = "extra-small"), bsPopover(id =

Tooltip in shiny UI for help text

由 跟風遠走 提交于 2019-12-04 06:21:05
I want to place a help text for check-box label as a tooltip. In the following example I use the shinyBS package - but I only get it to work for the title of the checkbox input group. Any ideas how it could work after the "Lernerfolg" or "Enthusiasmus" labels? library(shiny) library(shinyBS) server <- function(input, output) { output$distPlot <- renderPlot({ hist(rnorm(input$obs), col = 'darkgray', border = 'white') output$rendered <- renderUI({ checkboxGroupInput("qualdim", tags$span("Auswahl der Qualitätsdimension", tipify(bsButton("pB2", "?", style = "inverse", size = "extra-small"), "Here,
订阅 shinybs