Untitled"

input <-
  list(x = 10)
library(shiny)
renderText(input$x)
renderText(input$y)
my_df <- reactive({
  head(cars, input$x)
})

about_df <- reactiveValues(n_obs = nrow(my_df()), len = length(my_df()))


Try the shinyobjects package in your browser

Any scripts or data that you put into this service are public.

shinyobjects documentation built on July 29, 2020, 9:07 a.m.