Shiny basics for interactive apps in R Programming

Introduction

Shiny helps you make web apps that users can interact with easily. It turns your R code into a friendly app with buttons, sliders, and more.

You want to share your data analysis with others who don't know R.

You want users to explore data by changing inputs like dates or categories.

You want to build a simple tool that updates results instantly when inputs change.

Syntax

R Programming

library(shiny)

ui <- fluidPage(
  # UI elements go here
)

server <- function(input, output, session) {
  # Server logic goes here
}

shinyApp(ui, server)

ui defines what the user sees and interacts with.

server defines how the app reacts to user inputs and creates outputs.

Examples

This example shows a slider and text that updates when you move the slider.

R Programming

ui <- fluidPage(
  sliderInput("num", "Choose a number:", 1, 100, 50),
  textOutput("result")
)

server <- function(input, output, session) {
  output$result <- renderText({
    paste("You chose", input$num)
  })
}

This example counts how many times a button is clicked and shows the count.

R Programming

ui <- fluidPage(
  actionButton("go", "Click me"),
  textOutput("count")
)

server <- function(input, output, session) {
  counter <- reactiveVal(0)
  observeEvent(input$go, {
    counter(counter() + 1)
  })
  output$count <- renderText({
    paste("Button clicked", counter(), "times")
  })
}

Sample Program

This app lets the user pick a number with a slider. It shows double that number instantly.

R Programming

library(shiny)

ui <- fluidPage(
  titlePanel("Simple Shiny App"),
  sidebarLayout(
    sidebarPanel(
      sliderInput("num", "Pick a number:", 1, 10, 5)
    ),
    mainPanel(
      textOutput("double")
    )
  )
)

server <- function(input, output, session) {
  output$double <- renderText({
    paste("Double of your number is", input$num * 2)
  })
}

shinyApp(ui, server)

Important Notes

Use renderText() to create text outputs that update automatically.

Use input$ to get values from UI controls like sliders or buttons.

Always call shinyApp(ui, server) at the end to run your app.

Summary

Shiny apps have two parts: ui for what users see, and server for how the app works.

Use input controls to get user choices and output functions to show results.

Shiny updates outputs automatically when inputs change, making apps interactive.

Practice

1. In a Shiny app, what is the main role of the ui part?

easy

A. To perform calculations and data processing

B. To define what the user sees and interacts with

C. To store data permanently

D. To connect to external databases

Solution

1. Step 1: Understand the purpose of ui in Shiny

   The ui defines the layout and elements the user interacts with, like buttons and plots.

2. Step 2: Differentiate from server role

   The server handles logic and calculations, not the ui.

3. Final Answer:

   To define what the user sees and interacts with -> Option B

4. Quick Check:

   ui = user interface [OK]

Hint: Remember UI means User Interface, what users see [OK]

Common Mistakes:

• Confusing ui with server
• Thinking ui does data processing
• Assuming ui stores data

2. Which of the following is the correct way to create a numeric input in Shiny's UI?

easy

A. numericInput(inputId = "num", label = "Number", value = 0)

B. numericInput("Number", inputId = "num", value = 0)

C. numericInput(0, "Number", 0)

D. numericInput(label = "Number", value = 0)

Solution

1. Step 1: Recall numericInput syntax

   The correct order is numericInput(inputId, label, value).

2. Step 2: Check each option

   numericInput(inputId = "num", label = "Number", value = 0) matches the correct syntax exactly; others have wrong argument order or missing arguments.

3. Final Answer:

   numericInput(inputId = "num", label = "Number", value = 0) -> Option A

4. Quick Check:

   Correct argument order = numericInput(inputId = "num", label = "Number", value = 0) [OK]

Hint: Remember inputId first, then label, then value [OK]

Common Mistakes:

• Mixing argument order
• Omitting inputId
• Using unnamed arguments incorrectly

3. What will be the output shown in the Shiny app if the server code is:

server <- function(input, output) {
  output$text <- renderText({
    paste("Hello", input$name)
  })
}

and the UI has a textInput with inputId = "name" where the user types "Alice"?

medium

A. Error: object 'name' not found

B. input$name

C. Hello input$name

D. Hello Alice

Solution

1. Step 1: Understand renderText and input usage

   The renderText function returns text that updates automatically using input$name.

2. Step 2: Substitute input$name with user input

   User typed "Alice", so paste("Hello", input$name) becomes "Hello Alice".

3. Final Answer:

   Hello Alice -> Option D

4. Quick Check:

   Dynamic text output = "Hello Alice" [OK]

Hint: renderText shows text with input values replaced [OK]

Common Mistakes:

• Thinking input$name prints literally
• Confusing renderText with renderPrint
• Expecting error due to input usage

4. Identify the error in this Shiny server code snippet:

server <- function(input, output) {
  output$plot <- renderPlot({
    plot(data)
  })
}

Assuming data is not defined anywhere else.

medium

A. Missing definition of 'data' causes an error

B. renderPlot should be renderPlotly

C. output$plot should be output$plotOutput

D. plot() cannot be used inside renderPlot

Solution

1. Step 1: Check for variable definitions

   The code uses data inside plot() but data is not defined anywhere.

2. Step 2: Understand consequences of missing data

   This will cause an error because R cannot find the object data.

3. Final Answer:

   Missing definition of 'data' causes an error -> Option A

4. Quick Check:

   Undefined variable = error [OK]

Hint: Always define variables before using in render functions [OK]

Common Mistakes:

• Assuming plot() is invalid in renderPlot
• Confusing output variable names
• Thinking renderPlotly is required

5. You want to create a Shiny app that shows a histogram of a numeric variable chosen by the user from a dropdown menu. Which approach correctly connects the input and output?

hard

A. Use sliderInput to select variable, then plot histogram of entire data

B. Use numericInput for variable choice, then plot fixed variable in server

C. Use selectInput in UI for variable choice, then in server use renderPlot to plot histogram of data[[input$var]]

D. Use textInput for variable name, then plot histogram of input$var directly

Solution

1. Step 1: Choose correct input control for variable selection

   selectInput lets user pick a variable name from choices.

2. Step 2: Use input to select data column in server

   Access the chosen variable as data[[input$var]] and plot histogram with renderPlot.

3. Final Answer:

   Use selectInput in UI for variable choice, then in server use renderPlot to plot histogram of data[[input$var]] -> Option C

4. Quick Check:

   Dropdown input + dynamic plot = Use selectInput in UI for variable choice, then in server use renderPlot to plot histogram of data[[input$var]] [OK]

Hint: Use selectInput for choices, access with data[[input$var]] [OK]

Common Mistakes:

• Using numericInput instead of selectInput
• Trying to plot input$var directly without data
• Using sliderInput for variable selection