mirror of
https://github.com/johrpan/geposanui.git
synced 2025-10-26 11:17:24 +01:00
Add a generic caching function
This commit is contained in:
parent
400ca776e0
commit
abab22a907
4 changed files with 32 additions and 25 deletions
3
server.R
3
server.R
|
|
@ -4,8 +4,9 @@ library(shiny)
|
|||
|
||||
source("data.R")
|
||||
source("scatter_plot.R")
|
||||
source("util.R")
|
||||
|
||||
data <- load_data_cached("input")
|
||||
data <- run_cached("input", load_data, "input")
|
||||
|
||||
server <- function(input, output) {
|
||||
output$genes <- renderDT({
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue