Shiny Lasso Test w/ Reactive Values — shiny_lasso_test

Tests the shiny lasso module as a stand-alone application when the tomic is a reativeVal.

shiny_lasso_test_reactval(tomic, tomic_table)

Arguments

tomic: Either a tidy_omic or triple_omic object
tomic_table: A table taken from a tidy (i.e., augmented measurements) or triple omic dataset

Value

A shiny app

Examples

if (interactive()) {
  tomic <- brauer_2008_triple
  tomic_table <- tomic[["samples"]] %>% dplyr::filter(nutrient == "G")
  shiny_lasso_test_reactval(tomic, tomic_table)

  tomic_table <- tomic[["measurements"]] %>% dplyr::filter(expression < -3)
  shiny_lasso_test_reactval(tomic, tomic_table)
}