tanu/Dashboards
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

isolating observeevent()s

Browse source
This commit is contained in:
Tanushree Tunstall 2022-10-10 16:24:16 +01:00
parent 84ed09fea8
commit e9ce29f22b
2 changed files with 4 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

6
drug-target/server.R
View file

@ -149,11 +149,9 @@ function(input, output, session) {
# Isolated observeEvent() which updates all the UI controls independently of the plot rendering observeEvent() # Isolated observeEvent() which updates all the UI controls independently of the plot rendering observeEvent()
observeEvent( observeEvent(
{ {
input$display_position_range #input$display_position_range
input$stability_snp_param
input$logoplot_colour_scheme
input$switch_target input$switch_target
input$force input$force_ui
}, },
{ {
target_gene = input$switch_target target_gene = input$switch_target

3
drug-target/ui.R
View file

@ -28,7 +28,8 @@ dashboardPage(skin="purple",
menuItem("LogoP OR", tabName="LogoP OR"), menuItem("LogoP OR", tabName="LogoP OR"),
menuItem("Lineage", tabName="Lineage"), menuItem("Lineage", tabName="Lineage"),
actionButton("force", "Force Refresh"), actionButton("force", "Force Refresh"),
actionButton("force_ui", "Refresh UI controls"),
#menuItem('Stability count', tabName='Stability count'), #menuItem('Stability count', tabName='Stability count'),
# These conditionalPanel()s make extra settings appear in the sidebar when needed # These conditionalPanel()s make extra settings appear in the sidebar when needed