tests/testthat/apps/server-r/ui.R

library(shiny)

shinyUI(fluidPage(
  sliderInput("n", "N", 0, 100, 40),
  verbatimTextOutput("txt", placeholder = TRUE),
))

Try the shinylive package in your browser

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

shinylive documentation built on April 4, 2025, 5:45 a.m.