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

library(shiny)

ui <- fluidPage(
  titlePanel("Convert kilograms to grams"),
  p("From", a(href = "https://github.com/rstudio/shinytest2/issues/244", "Issue #244")),
  numericInput("kg", "Weight (in kg)", value = 0),
  textOutput("g")
)
rstudio/shinytest2 documentation built on March 29, 2025, 10:58 p.m.