From 9267afbb11d0102dfe2e982648a2f9af5c94b9ff Mon Sep 17 00:00:00 2001 From: Sciurus365 Date: Mon, 10 Jul 2023 20:18:39 +0800 Subject: [PATCH] 23.7.10.1 Bugfix: add data loading within the shiny function --- R/shiny.R | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/R/shiny.R b/R/shiny.R index 1017fa1..a2e22ce 100644 --- a/R/shiny.R +++ b/R/shiny.R @@ -1,5 +1,9 @@ shiny_server <- function(input, output, session) { + utils::data("MDDThresholds", package = "Isinglandr", envir = environment()) + utils::data("MDDConnectivity", package = "Isinglandr", envir = environment()) + # produce the landscape plot + output$l <- shiny::renderPlot({ original_network <- make_2d_Isingland(input$coef_t * MDDThresholds, input$coef_c * MDDConnectivity,