inst/global.R

In rsangole/tslabeler: Labeling Tool For Time Series Data

library(shinyWidgets)
library(shinyjs)

source("ui-functions.R")
`%>%` <- magrittr::`%>%` 
options(shiny.maxRequestSize = 100 * 1024^2)

# Initial Processessing ---------------------------------------------------

dt_list <- tslabeler:::get_dt_from_env()

env_tabs <-list(existing_tables = list("Dataframes" = c(dt_list, "")))