shinydashboard

问题 In the given R shiny script below, I am trying to use a conditional panel with Picker Input shiny widget. There are three options in pickerInput, upon selection of "times" option, I wish to create new pickerInputs using a conditional panel, the following is possible using selectInput, but I need the same for Picker Input. Thanks and please help. library(shiny) library(shinydashboard) ui <- dashboardPage( dashboardHeader(title = "Picket",titleWidth = 290), dashboardSidebar(width = 0),

问题 I'm trying to manually expand a submenu in a sidebar in shiny dashboard. The updateTabItems function allows me to go to the tab, but it does not expand the menu with it. I am looking for a reproducible answer to the question here:how to manually expand a submenu in a shiny dashboard side bar which includes a nice working example and answers which are however not implemented. 回答1: Here is a working code based on the referred answer. Please note that in this case the JavaScript uses the tabName

问题 I am trying to create a multi-layer drilldown graph using highcharter with dynamic data in shiny . I am able to accomplish this using just R code with a set input but when I put it in a shiny application and try to have it subset the data dynamically, it fails. Below is the code that that works in R (only drilling down from Farm to Sheep): library(shinyjs) library(tidyr) library(data.table) library(highcharter) library(dplyr) x <- c("Farm","Farm","Farm","City","City","City","Ocean","Ocean") y

问题 I want the bar plot to be embedded into application.output of vector d is giving me result I want that to be embedded into shinyapp and later I want to make it interactive too. library(ggplot2) driver1 <- read.csv("E:/RMARKDOWN/shiny/driver.csv",header = T) New_DataSet1<- data.frame(driver1$ï..Year_AG,driver1$Severity_Desc,driver1$Injury.Type) New_DataSet1 latest <- New_DataSet1[1:100,] latest d <- aggregate(latest$driver1.Injury.Type, by=list(chkID = latest$driver1.Severity_Desc), FUN=sum)

问题 In the example Data Frame DF , I have the following columns. gender <- c("Male", "Female","Female", "Male") Location <- c("AB", "BC", "CD", "DE") hasTV <- c("Yes","Yes","No","No") Latitude <- c(49.82380908513249,59.478568831926395,59.478568831926395,49.82380908513249) Longitude <- c(-10.8544921875,-10.8544921875,2.021484375,2.021484375) DF <- data.frame(gender,Location,hasTV,Latitude,Longitude) Under UI, i've used radiobuttons to select options from hasTV, checkboxGroupInput to select Gender

问题 I have multiple select inputs that control the output of a single bar graph currently. When you use the first selectinput, it will select the data source. There is a secondary selectinput which selects the variable from the first data source. The code below works when you have a non grouped bar plot. I am trying to create a double bar plot and I have another data source separate from the one I am using for the current plot. The two main data sources that have the exact same variables. However

问题 If you run the script below, You get a data table representing iris data and a range slider which gives you values greater than and equal to the chosen point on the prior circle of your selection in the slider. I want a logic such that when left slider node is kept at say 5 and right slider at 7, I want the data to be displayed "= and above 5" and "< and equal to 7".These values however should be dynamic. Also for the two circles on the sliders, is there a way to give triangle widgets which

问题 I have multiple select inputs that control the output of a single bar graph currently. When you use the first selectinput, it will select the data source. There is a secondary selectinput which selects the variable from the first data source. The code below works when you have a non grouped bar plot. I am trying to create a double bar plot and I have another data source separate from the one I am using for the current plot. The two main data sources that have the exact same variables. However

问题 I use airDatepicker from shinyWidget on my dashboard: Here I have succesfully change the size of the input container as shown in the picture, but not the container of calendar icon (the box where shinywidget place the calendar icon). What I wanted to change is the box encircled in yellow, not the icon itself which I mark with red border. Currently my code looks like this: tags$head( tags$style( HTML(" #choosedate {font-size: 13px; height: 25px;} #datepickers-container > div > nav {font-size:

问题 I have a table of customers in one of my tabs (let's call it a shop tab) within the shinydashboard. I want to add links for each customer that will send you to another tab in the shinydashboard (customer tab) which will provide more detailed information (mainly graphs of the customer behavior) about this specific customer. This could be easily achieved by copying the customer id and pasting it into the search bar in the customer tab, but I wanna know whether it is possible to do it more